VBA - 编程图表

使用 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 − 点击相应的按钮，图表就创建好了。在下面的输出中，单击生成饼图按钮。