Sådan oprettes diagram via VBA i Microsoft Excel
I denne artikel vil vi lære at oprette diagram via VBA i Microsoft Excel.
Lad os forstå med en simpel øvelse, hvordan vi kan oprette diagram gennem VBA i Microsoft Excel.
Vi har data i området A1: F10, hvor kolonne A indeholder elevens navn, kolonne B mærker 1, kolonne C mærker 2, kolonne D mærker 3, kolonne E indeholder total score, og kolonne F indeholder gennemsnit af karakterer.
Følg nedenstående trin og kode:-
- Indsæt en kommandoknap under fanen Udvikler> Indsæt> Kommandoknap 1.
- Tryk på tasten Alt+F11 for at åbne VBE -siden for at skrive makroen.
- Gå derefter til fanen Indsæt og indsæt et modul.
- Skriv nedenstående kode på siden.
Privat underkommandoButton1_Click ()
Område ("A2: A10, F1: F10"). Vælg
ActiveSheet.Shapes.AddChart.Select
ActiveChart.SetSourceData Source: = Range ("'Sheet1'! $ A $ 2: $ A $ 10, 'Sheet1'! $ F $ 2: $ F $ 10")
ActiveChart.ChartType = xlColumnClustered
ActiveSheet.ChartObjects (1) .Aktiver
ActiveSheet.ChartObjects (1) .Cut
Ark ("Ark2"). Vælg
ActiveSheet.Indsæt
Ark ("Ark1"). Vælg
Område ("F11"). Aktiver
Afslut Sub
Kode Forklaring:- Først definerer vi det udvalg, der skal vælges for at indsætte diagrammet, derefter indstiller vi datakilden og diagramtypen. Inden vi udfører en handling på diagrammet, skal vi aktivere det, og derefter vælger vi den destination, hvor vi vil indsætte vores diagram, og derefter skal vi vende tilbage til ark 1.
- Tryk på tasten F5 for at køre makroen.
- Diagrammet bliver oprettet i Workbook's Sheet 2.
Dette er den måde, vi kan oprette diagram på via VBA i Microsoft Excel.
