VBA - 如何将列转换为百分比

Question

我有一个生成利用率公式的代码，但是，当我希望以百分比的形式显示输出时，输出显示为$。

有谁知道如何通过VBA进行这项工作？我知道如何通过普通的excel轻松改变这一点，但我希望这个过程尽可能自动化。

我有什么至今：

'Utilisation rates 

With ActiveSheet 
    'Determine last row 
    Dim lastrow2 As Long 
    lastrow2 = .Cells(.Rows.Count, "F").End(xlUp).Row 

    'Copy the original values from column A to column B 
    .Range("H6:H" & lastrow2).Value = .Range("F6:F" & lastrow2).Value 

    'Copy/Pastespecial Divide using cell C3 
    .Range("C3").Copy 
    .Range("H6:H" & lastrow2).PasteSpecial Paste:=xlPasteValues, _ 
              Operation:=xlDivide, _ 
              SkipBlanks:=False, _ 
              Transpose:=False 
    Application.CutCopyMode = False 



End With 

谢谢！ （：

Answer 1

你应该只能够使用NumberFormat选项：

.Range("H6:H" & lastrow2).NumberFormat = "0.00%"