Kaip sukurti diagramą per VBA „Microsoft Excel“
Šiame straipsnyje mes sužinosime, kaip sukurti diagramą per VBA „Microsoft Excel“.
Su paprastu pratimu suprasime, kaip galime sukurti diagramą per VBA „Microsoft Excel“.
Turime duomenų diapazone A1: F10, kuriame A stulpelyje yra mokinio vardas, B stulpelyje 1, C stulpelyje 2, D stulpelyje 3, E stulpelyje yra bendras balas, o F stulpelyje yra pažymių vidurkis.
Atlikite toliau nurodytus veiksmus ir kodą:-
- Įveskite komandos mygtuką iš skirtuko Kūrėjas> Įterpti> Komandos mygtukas 1.
- Paspauskite klavišą „Alt“+F11, kad atidarytumėte VBE puslapį, kad galėtumėte rašyti makrokomandą.
- Tada eikite į skirtuką „Įterpti“ ir įdėkite modulį.
- Puslapyje parašykite žemiau nurodytą kodą.
Privati antrinė komandaButton1_Click ()
Diapazonas („A2: A10, F1: F10“). Pasirinkite
ActiveSheet.Shapes.AddChart.Select
ActiveChart.SetSourceData Šaltinis: = Diapazonas ("'Sheet1'! $ A $ 2: $ A $ 10, 'Sheet1'! $ F $ 2: $ F $ 10")
ActiveChart.ChartType = xlColumnClastered
ActiveSheet.ChartObjects (1). Aktyvinti
ActiveSheet.ChartObjects (1). Iškirpti
Skaičiuoklės („Sheet2“). Pasirinkite
ActiveSheet.Paste
Skaičiuoklės („Sheet1“). Pasirinkite
Diapazonas („F11“). Įjunkite
Pabaiga Sub
Kodo paaiškinimas:- Pirmiausia nustatysime diagramos įterpimo diapazoną, tada nustatysime duomenų šaltinį ir diagramos tipą. Prieš atlikdami veiksmą diagramoje, turime jį suaktyvinti, tada pasirenkame paskirties vietą, kur norime įklijuoti diagramą, o po to turime grįžti į 1 lapą.
- Norėdami paleisti makrokomandą, paspauskite klavišą F5.
- Diagrama bus sukurta 2 darbaknygės lape.
Taip galime sukurti diagramą per VBA „Microsoft Excel“.
