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步 - 點擊相應的按鈕,圖表被創建。 在下面的輸出中,點擊生成餅圖按鈕。


上一篇: VBA文本檔 下一篇:無