Grafikoni v Excelu VBA

Vizualizacija je pri vseh podatkih zelo pomembna. Kadar podatke predstavimo v tabelah in vrtišču, lahko drugi uporabnik težko razume glavni scenarij iz teh podatkov. Tako v excelu imamo grafikone, s katerimi lahko predstavimo svoje podatke. Grafikoni so vizualni prikaz podatkov v vrsticah in stolpcih Excelovega lista. Zdaj vsi vemo, kako v delovni list Excela vstaviti grafikon. V tej temi bomo spoznali uporabo grafikonov v VBA. Tako preprosto je, kot če uporabljamo lestvice v excelu. Tako kot na delovnem listu, kjer imamo različne vrste lestvic, da se odločimo za podobno, imamo tudi vse lestvice v VBA tudi kot predmet. Vse, kar moramo storiti, je poklicati ta predmet, da ga uporabimo. Iz VBA lahko naredimo grafikone na istem delovnem listu ali na ločenem listu tabele. Vendar je najbolj priporočljivo, da se grafikoni uporabijo na posebnem listu, da se izognete kakršni koli zmedi.

Zdaj, kakšne so lestvice v VBA? Grafikoni so preprosti predmeti v VBA. V VBA lahko naredimo dve vrsti lestvic. Eden je znan kot list grafikonov, drugi pa kot vgrajeni grafikoni. V listu grafikona VBA ustvari nov delovni list za grafikon. Kot izvorne podatke navedemo referenčne podatke, ki so še en delovni list. Zdaj so vgrajeni grafikoni tisti grafikoni, ki so prisotni na istem delovnem listu podatkov. Zdaj se kodiranje teh dveh vrst grafikonov med seboj nekoliko razlikuje, česar se bomo naučili v tej temi. Za uporabo lastnosti grafikona v VBA uporabljamo simbol pike (.) Kot IntelliSense. Zdaj se moramo spomniti ene stvari, da obstajajo različne vrste lestvic v excelu. Če za našo kodo ne zagotovimo vrste grafikona, VBA privzeto samodejno naredi grafikon stolpcev za nas. Očitno lahko to spremenimo z nekaj vrsticami kode.

Kako ustvariti grafikone v Excelu VBA?

Zdaj pa se naučimo, kako narediti grafikone v Excelu VBA z nekaj primeri.

Predlogo programa Excel Charts Excel lahko prenesete tukaj - VBA Charts Excel Template

Za vse primere bomo upoštevali enega podatka, ki je v 1. listu, kot sledi,

Excel VBA Grafikoni - Primer 1

Najprej se naučimo, kako vstaviti grafikon v VBA, za to sledite spodnjim korakom:

1. korak: Začnite s podprocesom, kot sledi.

Koda:

 Podgrami1 () Konec pod

2. korak: Označite eno spremenljivko kot objekt grafikona.

Koda:

 Podkartice1 () Dim Cht kot konec grafikona Pod

Korak 3: Za uporabo grafikonov moramo poklicati metodo dodajanja, kot je prikazano spodaj.

Koda:

 Pod-grafikoni1 () Dim Cht kot nastavljen grafikon Cht = Charts.Add End Sub

4. korak: Če želite uporabiti lastnosti predmeta grafikona, v kodo vstavite With Statement, kot je prikazano spodaj.

Koda:

 Pod-grafikoni1 () Dim Cht kot nastavljen grafikon Cht = Charts.Dodaj s Cht End s končnim Sub

Korak 5: Zdaj nam omogoči vir za ta grafikon, začnite z operaterjem pik in ta nam bo dal dodatne možnosti. Spodaj napišite naslednjo kodo, da vnesete vir za grafikon.

Koda:

 Pod-grafikoni1 () Dim Cht kot nastavljen grafikon Cht = grafikoni.Dodaj s Cht .SetSourceData Vir: = Sheets ("Sheet1"). Obseg ("A1: B6") End with End Sub

6. korak: Zdaj si zapomnite, da nismo navedli nobene vrste grafikona, najprej zaženite zgornjo kodo s pritiskom na tipko F5 in poglejte, kateri tip grafikona bo vstavljen.

Ustvarili smo nov list z imenom Chart in v njem je naš grafikon.

7. korak: Dajmo zdaj kodi vrsto grafikona, ki ga želimo uporabiti za to predstavitev,

8. korak: za ta primer izberite območje 3D, kot je prikazano spodaj,

Koda:

 Pod-grafikoni1 () Dim Cht kot nabor grafikonov cht = grafikoni.Dodaj s Cht .SetSourceData Vir: = Sheets ("Sheet1"). Obseg ("A1: B6") .ChartType = xl3DArea End with End Sub

9. korak: Zaženite kodo s pritiskom na tipko F5 ali s klikom na gumb Play in preverite vrsto grafikona na delovnem listu.

Zdaj si zapomnite, da bo vsakič, ko zaženemo kodo, ustvaril nov list grafikona za nas. To je znano tudi kot lista grafikona, ker ustvarja grafikone na drugem listu.

Excel VBA Grafikoni - primer # 2

Zdaj naredimo vdelani grafikon, ki pomeni grafikon na listu izvornih podatkov. Za to sledite spodnjim korakom, da ustvarite grafikon v Excelu VBA.

1. korak: V istem modulu zaženite še en podproces, kot sledi.

 Oznaka: Podgrami2 () Konec Pod

2. korak: Znova deklarirajte spremenljivko kot vrsto grafikona, kot sledi.

Koda:

 Podkartice2 () Dim Cht1 kot konec grafikona Pod

Korak 3: Razlika v vdelanih grafikonih je, da delovni list, ki ima podatke kot aktivni list, navajamo z naslednjo kodo, prikazano spodaj.

Koda:

 Pod grafikoni2 () Dim Cht1 kot nabor grafov Cht1 = ActiveSheet.Shapes.AddChart.Chart End Sub

Korak 4: Zdaj je preostali del izdelave in oblikovanja grafikonov podoben, v kodo spet vstavimo With Statement .

Koda:

 Pod grafikoni2 () Dim Cht1 kot nabor grafov Cht1 = ActiveSheet.Shapes.AddChart.Chart s Cht1 konec s koncem Sub

5. korak: Določimo lokacijo, na kateri bo naš grafikon, saj ne želimo, da je ta nad našimi podatki, zato pred Izjavo dodajte naslednjo kodo, na katero smo postavili svoj grafikon, kot sledi.

Koda:

 Pod-grafikoni2 () Dim Cht1 kot nastavljen grafikon Cht1 = ActiveSheet.Shapes.AddChart (levo: = 200, širina: = 300, vrh: = 50, višina: = 300).

6. korak: Navedimo izvor podatkov in vrsto grafikona, ki ga želimo, kot sledi.

Koda:

 Podatki2 () Dim Cht1 kot nastavljen grafikon Cht1 = ActiveSheet.Shapes.AddChart (levo: = 200, širina: = 300, vrh: = 50, višina: = 300) .Kartica s Cht1 .SetSourceData Vir: = Sheets ("Sheet1 ") .Range (" A1: B6 ") .ChartType = xl3DArea konec s končnim sub

7. korak: Zaženite kodo s pritiskom na tipko F5 ali s klikom na gumb Predvajaj in rezultat poglejte na našem listu, kjer so naslednji podatki.

Temu se reče vdelani grafikon, saj je grafikon na istem listu kot podatki.

Excel VBA Charts - Primer # 3

Obstaja tudi drug način za ustvarjanje grafikona na naših delovnih listih z uporabo VBA. Ta metoda je znana kot metoda ChartsObject.

1. korak: V istem modulu začnimo s tretjim podprocesom, kot sledi.

Koda:

 Podgrami3 () Končni pod

2. korak: Stožec kot podatkov delovnega lista vnesite drugo kot obseg in eno kot objekt grafikona, kot je prikazano spodaj.

Koda:

 Pod Charts3 () Dim WK kot delovni list, Rng kot domet, Cht3 kot ChartObject End Sub

Korak 3: Najprej nastavite delovni list na mesto, kjer so podatki, to je list 1 v tem primeru.

Koda:

 Pod Charts3 () Dim WK kot delovni list, Rng kot obseg, Cht3 kot ChartObject Set WK = delovni listi ("Sheet1") End Sub

4. korak: Zdaj izberite obseg podatkov, ki jih imamo, na naslednji način.

Koda:

 Pod-grafikoni3 () Dim WK kot delovni list, rng kot obseg, Cht3 kot skup ChartObject WK = delovni listi ("Sheet1") Rng = WK.Range ("A1: B6") konec pod

5. korak: Zdaj postavite objekt grafikona, da doda grafikon z lastnostjo predmeta grafikona na naslednji način.

Koda:

 Pod Charts3 () Dim WK kot delovni list, Rng kot obseg, Cht3 kot Set ChartObject WK = Delovni listi ("Sheet1") Set Rng = WK.Range ("A1: B6") Nastavi Cht3 = WK.ChartObjects.Add (Levo: = ActiveCell.Left, širina: = 400, vrh: = ActiveCell.Top, višina: = 200) konec pod

6. korak: Zdaj podajmo vir v tabelo na naslednji način.

Koda:

 Pod Charts3 () Dim WK kot delovni list, Rng kot obseg, Cht3 kot Set ChartObject WK = Delovni listi ("Sheet1") Set Rng = WK.Range ("A1: B6") Nastavi Cht3 = WK.ChartObjects.Add (Levo: = ActiveCell.Left, širina: = 400, vrh: = ActiveCell.Top, višina: = 200) Cht3.Chart.SetSourceData Vir: = Rng End Sub

7. korak: Zdaj izberite vrsto grafikona, ki ga želimo podobno, kot sledi.

Koda:

 Pod Charts3 () Dim WK kot delovni list, Rng kot obseg, Cht3 kot ChartObject Set WK = delovni listi ("Sheet1") Set Rng = WK.Range ("A1: B6") Set Cht3 = WK.ChartObjects.Add (Levo: = ActiveCell.Left, Širina: = 400, Na vrh: = ActiveCell.Top, Višina: = 200) Vir Cht3.Chart.SetSourceData: = Rng Cht3.Chart.ChartType = xl3DColumn End Sub

Korak 8: Zaženite kodo s pritiskom na tipko F5 ali s klikom na gumb Predvajaj in rezultat poglejte v 1. listu.

Stvari, ki jih je treba zapomniti

  • Odločimo se, katero vrsto grafikonov želimo uporabiti z nastavitvijo vrste grafikona.
  • V vrsti Chart, kolikokrat zaženemo kodo, se ustvari nov delovni list pod edinstvenim imenom grafikona z grafikonom v njem.
  • Objekt grafikona je tudi član listov, v katerih imamo tako grafikone kot liste.
  • Za uporabo predmeta grafikona moramo najprej uporabiti stavek SET.

Priporočeni članki

To je vodnik za VBA lestvice. Tukaj razpravljamo o tem, kako ustvariti grafikone v Excelu z uporabo kode VBA skupaj s praktičnimi primeri in naloženo predlogo excela. Ogledate si lahko tudi druge naše predlagane članke -

  1. VBA PowerPoint
  2. Excel kombinacijske lestvice
  3. VBA Preverite datoteko
  4. Excel stolpca grafikon

Kategorija:

VBA