Opprette diagrammer i VBA

July 25  by Eliza

Excel er svært hendig til å lage diagrammer fra data i et regneark. Hva om du ønsker å opprette et diagram direkte fra VBA, uten bruk av data i et regneark? Du kan gjøre dette ved å "lure" Excel til å tro det er å jobbe med informasjon fra et regneark, og deretter gi din egen. Følgende makro illustrerer dette konseptet:

Sub MakeChart ()
"Legg til et nytt diagram
Charts.Add

'Sett dummy dataområde for diagrammet
ActiveChart.SetSourceData Sheets ("Ark1") Range ("A1: d4")., _
PlotBy: = xlColumns

'Manuelt sett verdiene for dataserien
ActiveChart.SeriesCollection (1) .Formula = _
"= SERIES (" "First Data" ", {" "a" "," "b" "," "c" "," "d" "}, {2,3,4,5}, 1)"
ActiveChart.SeriesCollection (2) .Formula = _
"= SERIES (" "Andre data" ", {" "a" "," "b" "," "c" "," "d" "}, {6,7,8,9}, 2)"
ActiveChart.SeriesCollection (3) .Formula = _
"= SERIES (" "Third data" ", {" "a" "," "b" "," "c" "," "d" "}, {10,11,12,13}, 3)"
End Sub

Kommentarene i dette eksempelet forklare hva som skjer for hvert trinn. Ved innstilling av dummy dataområdet, antar SetSourceData metode området er på et regneark heter Ark1. Hvis du ikke har et slikt ark i arbeidsboken, må du endre kommandoen tilsvarende.

Senere, når du setter verdiene manuelt for dataserien, er serien kommandoen brukes til å angi etiketten for serien (First Data, andre data, og Third Data), rekken av kategorietikettene (a, b, c og d i alle serier), rekken av verdier for serien, og en rekke spesifisere hvilken serie nummer dette representerer.

ExcelTips er din kilde for kostnadseffektiv Microsoft Excel trening. Dette tipset (10347) gjelder for Microsoft Excel 2007, 2010, og 2013. Du kan finne en versjon av dette tipset for den eldre menygrensesnittet av Excel her: Lage Figurer i VBA.