Sådan oprettes et diagram i VBA excel

May 15

Vide, hvordan man dynamisk oprette diagrammer med Visual Basic for Applications kan spare tid, når man analyserer store mængder data. Microsoft Excel er almindeligt anvendt til at indsamle data, der svarer til en Access-database. Excel tilbyder forskellige typer af diagrammer såsom pie, line, kolonne og andre formater. Kolonne diagrammer bruges ofte i Excel til grafisk vise oplysninger. Det er ikke svært at oprette diagrammer ved hjælp af VBA til at præsentere dine data klart og mere effektivt.

Vejledning

• Åbn Microsoft Excel 2007, og klik på fanen "Udvikler". Vælg "Visual Basic og skriv" Sub createColumnChart () "og tryk" Enter "for at oprette en ny sub.

• Skriv "Dim min Chart Som figur Range (" A1 "). Vælg ActiveCell.Value =" Chart Data 1 "Range (" A2 "). Vælg ActiveCell.Value =" 1 "Range (" A3 "). Vælg ActiveCell. Value = "2" Range ("A4"). Vælg ActiveCell.Value = "3" Range ("A5"). Vælg ActiveCell.Value = "4" Range ("B1"). Vælg ActiveCell.Value = "kortdata 2 "Range (" B2 "). Vælg ActiveCell.Value =" 5 "Range (" B3 "). Vælg ActiveCell.Value =" 6 "Range (" B4 "). Vælg ActiveCell.Value =" 7 "Range (" B5 "). Vælg ActiveCell.Value =" 8 "Range (" B6 "). Vælg" at erklære diagrammet variabel og tilføjer nogle data til diagrammet.

• Type "Set min Chart = Charts.Add" for at tilføje et nyt diagram. Type "Med min Chart .name =" Chart data ".ChartType = xlColumnClustered .SetSourceData Kilde: = Sheets (" Ark1 ") Range. (" A1: B5 "), _ PlotBy: = xlRows .HasTitle = True .ChartTitle.Text = "= Ark1! r1c2" .Axes (xlCategory, xlPrimary) .HasTitle = True .Axes (xlCategory, xlPrimary) .AxisTitle.Characters.Text = "Chart Data 1" .Axes (xlValue, xlPrimary) .HasTitle = true .Axes (xlValue, xlPrimary) .AxisTitle.Characters.Text = "Chart Data 2" End Med "for at indstille chart egenskaber.

• Skriv "End Sub", hvis det er nødvendigt. Udfør din nye sub.