Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Specifying the Chart Type

Sub chartType()     Dim myChartObject As ChartObject     Set myChartObject = ActiveSheet.ChartObjects.Add(Left:=200, Top:=200, _         Width:=400, Height:=300)          myChartObject.Chart.SetSourceData Source:= _         ActiveWorkbook.Sheets("Chart Data").Range("A1:E5")     myChartObject.ChartType = xlColumnStacked End Sub