This macro adds a column chart to Excel. This is an easy to use macro that allows you to quickly chart and graph a range of data in Excel. This is a small macro that will create the column chart from a range or set of data that you have in your worksheet. The ranges are hard-coded into the macro.
To use this macro, you only need to replace 'Sheet1'!$A$1:$B$67 with the range or cell references that contain your source data in Excel.
Sub Create_Column_Chart()
'create a column chart with this excel macro
ActiveSheet.Shapes.AddChart.Select
ActiveChart.SetSourceData Source:=Range("'Sheet1'!$A$1:$B$67")
ActiveChart.ChartType = xlColumnClustered
End Sub