Spisie treści
Utwórz wykres słupkowy w VBA
Poniższy samouczek opisuje, jak utworzyć wykres słupkowy za pomocą VBA.
Kroki:
1. Wejdź do okna projektu VBA, klikając prawym przyciskiem myszy nazwę arkusza i wybierając „Wyświetl kod” lub wybierając „ALT, F11”.
2. Po prawej stronie kliknij prawym przyciskiem myszy nazwę swojego projektu i wybierz wstawkę „moduł”.
3. Skopiuj i wklej następujący kod do nowo utworzonego modułu:
Sub MakeChart() Dim myRange As Range Ustaw myRange = Application.InputBox _ (Prompt:="Wybierz dane wejściowe wykresu", Type:=8) Charts.Add ActiveChart.ChartType = xlColumnClustered ActiveChart.SetSourceData Source:=myRange, _ PlotBy:= xlColumns ActiveChart.Location Gdzie: = xlLocationAsNewSheet End Sub
4. Kliknij przycisk Zapisz.
5. Kliknij małą ikonę Excela w prawym górnym rogu pod menu „Plik”, aby wyjść z okna projektu VBA i wrócić do Excela.
6. Następnie uruchom makro, naciskając „Alt F8”, aby wyświetlić listę dostępnych makr i wybierając „MakeChart”.
liczyć
liczyć
liczyć
liczyć
liczyć
liczyć
