数百个Excel图表上的小数位数

时间:2015-09-08 14:01:40

标签: excel excel-vba graph format vba

如果我正在处理数百个图表,现​​在正在自动设置y轴,我怎样才能消除10.0%,20.0%,并使其简单地为10%,20%(节省2个字符) )?我使用的是Excel 2010,并且不想搞乱自动格式化,因为有时我需要小数百分比,如失业(4.5%是有意义的)。当然,有时我会在y轴上绘制数百万或数十亿美元的东西(但这是一个单独的问题)。

更新:我发现电子表格中的安全规则禁止宏。通过设置值,可以在没有宏的情况下完成吗?也许这是供应商(微软)未来几年会做的事情......

1 个答案:

答案 0 :(得分:0)

右键单击要更改的Y轴。转到"格式化轴",然后单击"数字"。您可以在此处选择所需格式的类型(会计,编号,百分比等)。只需选择"百分比"并把" 0"对于"小数位"。

宏将对工作表中的所有图表执行此操作:

Sub Macro2()
Dim obj     As Object
For Each obj In ActiveSheet.ChartObjects
    With obj.Chart.Axes(xlValue)
       .TickLabels.NumberFormat = "0%"
    End With
Next obj

End Sub