Turinys
Sukurkite juostinę diagramą VBA
Šioje pamokoje bus aprašyta, kaip sukurti juostinę diagramą naudojant VBA.
Žingsniai:
1. Įeikite į VBA projekto langą dešiniuoju pelės klavišu spustelėdami lapo pavadinimą ir pasirinkę „View Code“ arba pasirinkę „ALT, F11“.
2. Dešinėje pusėje dešiniuoju pelės mygtuku spustelėkite savo projekto pavadinimą ir pasirinkite įdėtą „modulį“.
3. Nukopijuokite ir įklijuokite šį kodą į ką tik sukurtą naują modulį:
Sub MakeChart () Dim myRange As Range Set myRange = Application.InputBox _ (Prompt: = "Select chart inputs", Type: = 8) Charts.Add ActiveChart.ChartType = xlColumnClastered ActiveChart.SetSourceData Šaltinis: = myRange, _ PlotBy = xlColumns ActiveChart.Location Kur: = xlLocationAsNewSheet End Sub
4. Spustelėkite išsaugojimo mygtuką.
5. Spustelėkite mažą „Excel“ piktogramą viršutiniame dešiniajame meniu „Failas“, kad išeitumėte iš VBA projekto lango ir grįžtumėte į „Excel“.
6. Tada paleiskite makrokomandą paspausdami „Alt F8“, kad būtų parodytas galimų makrokomandų sąrašas, ir pasirinkite „MakeChart“.
countertif
countertif
countertif
countertif
countertif
countertif