使用 VBA,您可以根据特定标准生成图表。让我们用一个例子来看看它。
Step 1 - 输入必须生成图表的数据。
Step 2 - 创建 3 个按钮 - 一个用于生成条形图,另一个用于生成饼图,另一个用于生成柱形图。
第 3 步- 开发一个宏来生成每种类型的图表。
' Procedure to Generate Pie Chart
Private Sub fn_generate_pie_graph_Click()
Dim cht As ChartObject
For Each cht In Worksheets(1).ChartObjects
cht.Chart.Type = xlPie
Next cht
End Sub
' Procedure to Generate Bar Graph
Private Sub fn_Generate_Bar_Graph_Click()
Dim cht As ChartObject
For Each cht In Worksheets(1).ChartObjects
cht.Chart.Type = xlBar
Next cht
End Sub
' Procedure to Generate Column Graph
Private Sub fn_generate_column_graph_Click()
Dim cht As ChartObject
For Each cht In Worksheets(1).ChartObjects
cht.Chart.Type = xlColumn
Next cht
End Sub
Step 4 - 单击相应的按钮后,将创建图表。在以下输出中,单击生成饼图按钮。
原创文章,转载请注明出处:http://b.nwumba.cn/article/36/