Sloupcový graf prostřednictvím VBA

Anonim

Jak vytvořit graf pomocí VBA v aplikaci Microsoft Excel

V tomto článku se naučíme, jak vytvořit graf pomocí VBA v aplikaci Microsoft Excel.

Pojďme si s jednoduchým cvičením uvědomit, jak můžeme vytvořit graf pomocí VBA v Microsoft Excelu.

Máme data v rozsahu A1: F10, ve kterých sloupec A obsahuje jméno studenta, sloupec B Známky 1, sloupec C Známky 2, sloupec D Známky 3, sloupec E obsahuje Celkové skóre a sloupec F obsahuje Průměr známek.

Postupujte podle níže uvedených kroků a kódu:-

  • Vložte příkazové tlačítko na kartě Vývojář> Vložit> Příkazové tlačítko 1.
  • Stisknutím klávesy Alt+F11 otevřete stránku VBE pro zápis makra.
  • Poté přejděte na kartu Vložit a vložte modul.
  • Na stránku napište níže uvedený kód.

Private Sub CommandButton1_Click ()

Rozsah („A2: A10, F1: F10“). Vyberte

ActiveSheet.Shapes.AddChart.Select

ActiveChart.SetSourceData Zdroj: = Rozsah ("'List1'! $ A $ 2: $ A $ 10, 'List1'! $ F $ 2: $ F $ 10")

ActiveChart.ChartType = xlColumnClustered

ActiveSheet.ChartObjects (1). Aktivovat

ActiveSheet.ChartObjects (1). Cut

Tabulky („List2“). Vyberte

ActiveSheet.Paste

Tabulky („List1“). Vyberte

Rozsah ("F11"). Aktivujte

End Sub

Vysvětlení kódu:- Nejprve definujeme rozsah výběru pro vložení grafu a poté nastavíme zdroj dat a typ grafu. Před provedením akce na grafu ji musíme aktivovat a poté vybereme cíl, kam chceme graf vložit, a poté se musíme vrátit na list 1.

  • Makro spustíte stisknutím klávesy F5.
  • Graf bude vytvořen v listu 2 sešitu.

Toto je způsob, jak můžeme vytvořit graf prostřednictvím VBA v aplikaci Microsoft Excel.