Grafy v aplikácii Excel VBA

Vizualizácia je v akýchkoľvek údajoch veľmi dôležitá. Vo vynikajúcich prípadoch, keď prezentujeme údaje v tabuľkách a kontingenčných tabuľkách, môže byť pre iného používateľa ťažké pochopiť hlavný scenár z údajov. Takže vo vynikajúcej, máme grafy prezentovať naše údaje. Grafy sú vizuálne znázornenie údajov prítomných v riadkoch a stĺpcoch tabuľky excelu. Teraz všetci vieme, ako vložiť graf do vynikajúceho pracovného hárka. V tejto téme sa dozvieme o používaní grafov vo VBA. Je to také jednoduché, ako vo vynikajúcich grafoch. Teraz, rovnako ako v pracovnom hárku, kde máme rôzne typy grafov, ktoré sa môžu rozhodnúť podobne, máme všetky grafy vo VBA tiež ako objekt. Potrebujeme iba zavolať tento objekt, aby sme ho mohli použiť. Môžeme vytvárať grafy z VBA v rovnakom pracovnom liste alebo v samostatnom hárku grafu. Najlepšie je však použitie grafov na samostatnom hárku, aby nedošlo k zámene.

Aké sú teraz grafy vo VBA? Grafy sú jednoduché objekty vo VBA. Môžeme vytvoriť dva typy grafov vo VBA. Jeden je známy ako hárok s grafom, zatiaľ čo druhý je známy ako vložené grafy. V liste grafov vytvorí VBA nový pracovný hárok pre graf. Referenčné údaje, ktoré sú iným pracovným hárkom, uvádzame ako zdrojové údaje. Teraz sú vložené grafy tie grafy, ktoré sa nachádzajú v rovnakom pracovnom liste údajov. Teraz sa kódovanie týchto dvoch typov máp mierne líši od seba, ktoré sa naučíme v tejto téme. Na použitie vlastností grafu vo VBA používame ako IntelliSense bodkový (.) Symbol. Teraz si musíme pamätať na jednu vec, že ​​existujú rôzne typy grafov vo vynikajúcich. Ak pre náš kód neposkytneme typ grafu, VBA pre nás automaticky vytvorí stĺpcový graf. Zrejme to môžeme zmeniť pomocou niekoľkých riadkov kódu.

Ako vytvoriť grafy v Excel VBA?

Teraz sa naučíme, ako vytvárať tabuľky v Excel VBA s niekoľkými príkladmi.

Túto šablónu aplikácie VBA Charts Excel si môžete stiahnuť tu - šablónu VBA Charts Excel

Vo všetkých príkladoch vezmeme do úvahy jeden údaj, ktorý je uvedený v hárku 1, nasledovne:

Grafy Excel VBA - Príklad č. 1

Najprv sa naučme, ako vložiť graf do jazyka VBA. Postupujte podľa nasledujúcich krokov:

Krok 1: Postupujte podľa nasledujúceho postupu.

kód:

 Podčasti 1 () Koniec pod

Krok 2: Vyhláste jednu premennú ako objekt grafu.

kód:

 Podčasti Grafy1 () Dim Cht ako Koniec grafu Sub

Krok 3: Aby sme mohli používať grafy, musíme zavolať metódu pridania, ako je uvedené nižšie.

kód:

 Vedľajšie grafy1 () Dim Cht ako súprava grafov Cht = Charts.Add End Sub

Krok 4: Ak chcete použiť vlastnosti objektu grafu, vložte do príkazu príkaz With With, ako je to znázornené nižšie.

kód:

 Vedľajšie grafy1 () Dim Cht ako súprava grafov Cht = Charts.Add With Cht End with End Sub

Krok 5: Teraz poskytnite zdroj pre túto mapu, začnite bodkovým operátorom a poskytne nám ďalšie možnosti. Zadajte nasledujúci kód a zadajte zdroj pre graf.

kód:

 Vedľajšie grafy1 () Dim Cht ako množina grafov Cht = Charts.Add With Cht .SetSourceData Source: = Sheets ("Sheet1"). Range ("A1: B6") End with End Sub

Krok 6: Pamätajte, že sme nezadali žiaden typ grafu, najprv spustite vyššie uvedený kód stlačením klávesu F5 a zistite, aký typ grafu sa vloží.

Vytvorili sme nový hárok s názvom Graf a má v ňom náš graf.

Krok 7: Teraz dajme kódu typ tabuľky, ktorú chceme použiť pre túto reprezentáciu,

Krok 8: Vyberieme pre tento príklad oblasť 3D, ako je uvedené nižšie,

kód:

 Čiastkové grafy1 () Dim Cht ako súprava grafov Cht = Charts.Add With Cht .SetSourceData Source: = Sheets ("Sheet1"). Range ("A1: B6") .ChartType = xl3DArea End with End Sub

Krok 9: Spustite kód stlačením klávesu F5 alebo kliknutím na tlačidlo Prehrať a skontrolujte typ grafu v pracovnom hárku.

Teraz nezabudnite zakaždým, keď spustíme kód, vytvorí pre nás nový graf. Toto sa tiež nazýva hárok s grafom, pretože vytvára grafy v inom hárku.

Grafy Excel VBA - Príklad č. 2

Teraz vytvorme zabudovanú schému, čo znamená graf v hárku zdrojových údajov. Postupujte podľa nasledujúcich krokov a vytvorte graf v programe Excel VBA.

Krok 1: V tom istom module spustite ďalší podprogram nasledovne.

 Kód: Podčasti 2 () Koniec pod

Krok 2: Opäť deklarujte premennú ako typ grafu nasledovne.

kód:

 Čiastkové grafy2 () Dim Cht1 ako koniec grafu Č

Krok 3: Rozdiel vo vložených grafoch predstavuje nasledujúci pracovný hárok, ktorý obsahuje údaje ako aktívny hárok.

kód:

 Čiastkové grafy2 () Dim Cht1 ako súprava grafov Cht1 = ActiveSheet.Shapes.AddChart.Chart End Sub

Krok 4: Teraz je zostávajúca časť tvorby a navrhovania grafov podobná, znova sme do kódu vložili príkaz With With Statement .

kód:

 Čiastkové grafy2 () Dim Cht1 ako súprava grafov Cht1 = ActiveSheet.Shapes.AddChart.Chart S Cht1 Koniec s End Sub

Krok 5: Stanovme miesto, kde bude náš graf, pretože nechceme, aby to bolo nad našimi údajmi, takže pred príkazom Statement pridajte nasledujúci kód do miesta, kde sme náš graf nastavili nasledujúcim spôsobom.

kód:

 Čiastkové grafy2 () Dim Cht1 ako súprava grafov Cht1 = ActiveSheet.Shapes.AddChart (Ľavý: = 200, Šírka: = 300, Vrch: = 50, Výška: = 300). Graf S Cht1 Koniec s Sub Sub

Krok 6: Teraz nám poskytnite zdroj údajov a typu grafu, ktorý chceme byť nasledujúci.

kód:

 Čiastkové grafy2 () Dim Cht1 ako súprava grafov Cht1 = ActiveSheet.Shapes.AddChart (Ľavý: = 200, Šírka: = 300, Vrch: = 50, Výška: = 300). Graf S Cht1 .SetSourceData Zdroj: = Tabuľky ("Sheet1" ") .Range (" A1: B6 ") .ChartType = xl3DArea End With End Sub

Krok 7: Spustite kód stlačením klávesu F5 alebo kliknutím na tlačidlo Prehrať a pozrite si výsledok v našom hárku, kde sú nasledujúce údaje.

Nazýva sa to vložený graf, pretože je v rovnakom hárku ako údaje.

Grafy Excel VBA - Príklad č. 3

Existuje aj iný spôsob, ako vytvoriť graf v našich pracovných hárkoch pomocou VBA. Táto metóda je známa ako metóda ChartsObject.

Krok 1: V tom istom module začnime tretím podprogramom nasledovne.

kód:

 Podčasti3 () Koniec podč

Krok 2: Kužeľ ako údaj pracovného hárka iný ako rozsah a jeden ako objekt grafu, ako je uvedené nižšie.

kód:

 Vedľajšie grafy3 () Dim WK ako pracovný hárok, Rng As Range, Cht3 ako ChartObject End Sub Sub

Krok 3: Najskôr nastavte pracovný hárok na miesto, kde sú údaje, čo je v tomto prípade hárok 1.

kód:

 Vedľajšie grafy3 () Dim WK ako pracovný hárok, Rng As Range, Cht3 ako ChartObject Set WK = Pracovné hárky ("Sheet1") End Sub

Krok 4: Teraz vyberte rozsah údajov, ktoré máme, nasledovne.

kód:

 Vedľajšie grafy3 () Dim WK ako pracovný list, Rng As Range, Cht3 ako ChartObject Set WK = Pracovné listy ("Sheet1") Set Rng = WK.Range ("A1: B6") End Sub

Krok 5: Teraz nastavte objekt grafu na pridanie grafu pomocou vlastnosti objektu graf nasledovne.

kód:

 Čiastkové grafy3 () Dim WK ako pracovný list, Rng As Range, Cht3 As ChartObject Set WK = Pracovné listy ("Sheet1") Set Rng = WK.Range ("A1: B6") Set Cht3 = WK.ChartObjects.Add (Left: = ActiveCell.Left, Width: = 400, Top: = ActiveCell.Top, Height: = 200) End Sub

Krok 6: Teraz dajte zdroj do grafu nasledovne.

kód:

 Čiastkové grafy3 () Dim WK ako pracovný list, Rng As Range, Cht3 As ChartObject Set WK = Pracovné listy ("Sheet1") Set Rng = WK.Range ("A1: B6") Set Cht3 = WK.ChartObjects.Add (Left: = ActiveCell.Left, Width: = 400, Top: = ActiveCell.Top, Height: = 200) Cht3.Chart.SetSourceData Source: = Rng End Sub Sub

Krok 7: Teraz vyberte požadovaný typ grafu podobne.

kód:

 Čiastkové grafy3 () Dim WK ako pracovný list, Rng As Range, Cht3 As ChartObject Set WK = Pracovné listy ("Sheet1") Set Rng = WK.Range ("A1: B6") Set Cht3 = WK.ChartObjects.Add (Left: = ActiveCell.Left, Šírka: = 400, Hore: = ActiveCell.Top, Výška: = 200) Cht3.Chart.SetSourceData Zdroj: = Rng Cht3.Chart.ChartType = xl3DC Endumn Sub Sub

Krok 8: Spustite kód stlačením klávesu F5 alebo kliknutím na tlačidlo Prehrať a pozrite si výsledok v hárku 1.

Čo je potrebné pamätať

  • Nastavením typu grafu sa môžeme rozhodnúť, ktorý typ má byť použitý.
  • V časti Typ grafu, koľkokrát spustíme kód, sa vytvorí nový pracovný hárok pod jedinečným názvom grafu, ktorý obsahuje graf.
  • Objekt grafu je tiež členom hárkov, v ktorých máme grafy aj hárky.
  • Aby sme mohli použiť objekt grafu, musíme najprv použiť príkaz SET na nastavenie grafu.

Odporúčané články

Toto je sprievodca grafmi VBA. Tu diskutujeme o tom, ako vytvoriť grafy v Exceli pomocou kódu VBA spolu s praktickými príkladmi a stiahnuteľnou vynikajúcou šablónou. Môžete si tiež prečítať naše ďalšie navrhované články -

  1. VBA PowerPoint
  2. Kombinované tabuľky Excel
  3. Skontrolujte súbor VBA
  4. Stĺpcový graf Excel

Kategórie:

VBA