Create a bar chart in Excel with this macro. You will be able to quickly and easily turn any range of numbers and data into an Excel bar chart. This is a great macro because it is so simply and therefore easy to integrate into any existing projects of macros for Excel.
This macro has a hard-coded (static) range as the reference for the source data in Excel. This is the only part of the macro that you will need to modify to be able to use the macro in your workbook. To use this macro, simply replace 'Sheet1'!$A$1:$B$67 with the range and cell references of the source data in your Excel workbook.
Sub Create_Bar_Chart()
'create a bar chart in excel with this macro
ActiveSheet.Shapes.AddChart.Select
ActiveChart.SetSourceData Source:=Range("'Sheet1'!$A$1:$B$67")
ActiveChart.ChartType = xlBarClustered
End Sub