Учебники

VBA – Графики программирования

Используя VBA, вы можете создавать графики на основе определенных критериев. Давайте посмотрим на это на примере.

Шаг 1 – Введите данные, по которым должен быть сгенерирован график.

График в VBA

Шаг 2 – Создайте 3 кнопки – одну для создания гистограммы, другую для создания круговой диаграммы и другую для создания столбчатой ​​диаграммы.

График в VBA

Шаг 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 – При нажатии на соответствующую кнопку создается диаграмма. В следующем выводе нажмите кнопку «Сгенерировать круговую диаграмму».