使用VBA,可以根据特定标准生成图表。下面通过一个例子来看看它如何实现。
第1步 - 输入要生成图形的数据。
第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
第4步 - 点击相应的按钮,图表被创建。 在下面的输出中,点击生成饼图按钮。