Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Adding a Chart Sheet Using VBA Code

Sub AddChartSheet()          Dim myChart As Chart          Set myChart = Charts.add          With myChart              .SetSourceData Source:=Sheets("Sheet1").range("A3:D7"), _                            PlotBy:=xlRows              .ChartType = xlColumnClustered              .HasTitle = True              .ChartTitle.text = "Mangoes"          End With      End Sub