Vba：如何将单元格格式设置为百分比

您可以在 VBA 中使用以下基本语法将范围中的每个单元格格式设置为百分比。

 SubFormatPercent ()
    Dim i As Integer

    For i = 2 To 11
    Range(" A " & i).NumberFormat = " 0.00% "
    Next i
    
End Sub

此特定示例将A2:A11范围内的每个单元格格式设置为带有两位小数的百分比值。

以下示例展示了如何在实践中使用此语法。

示例：使用 VBA 将单元格格式设置为百分比

假设我们在 Excel 中有以下值列表：

假设我们要将每个值格式化为百分比。

例如：

• 0.22 应格式化为 22%。
• 0.35 应格式化为 35%。

等等。

我们可以创建以下宏来执行此操作：

 SubFormatPercent ()
    Dim i As Integer

    For i = 2 To 11
    Range(" A " & i).NumberFormat = " 0.00% "
    Next i
    
End Sub

当我们运行这个宏时，我们会收到以下输出：

现在，每个值都被格式化为带有两位小数的百分比。

请注意， NumberFormat属性中小数点后零的数量指定每个百分比中显示的小数位数。

我们可以使用以下语法来显示每个百分比中的小数位：

 SubFormatPercent ()
    Dim i As Integer

    For i = 2 To 11
    Range(" A " & i).NumberFormat = " 0% "
    Next i
    
End Sub

当我们运行这个宏时，我们会收到以下输出：

请注意，每个百分比值的小数位均已删除。

注意：您可以在此处找到 VBA NumberFormat属性的完整文档。

其他资源

以下教程说明如何在 VBA 中执行其他常见任务：

VBA：如何按多列对工作表进行排序
VBA：如何计算范围内的行数
VBA：如何过滤列