VBA Chart problem

[ph03]

Has anyone had a problem with adding an embedded chart using VBA syntax in the 2010 version? My syntax is below, the macro stalls on line 2.

Range("A1:E5").Select
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlColumnClustered
ActiveChart.SetSourceData Source:=Range("Table!$A$1:$E$5")

 

[VoG]

Try like this

Sub AddChart()
Dim ChtObj As ChartObject
Set ChtObj = ActiveSheet.ChartObjects.Add(Left:=250, Width:=375, Top:=75, Height:=225)
With ChtObj.Chart
    .ChartType = xlColumnClustered
    .SetSourceData Source:=Sheets("Table").Range("A1:E5")
End With
End Sub

 

[ph03]

Thanks so much for your response! It's still not working which make me think I may need to reinstall my Excel program. Do you have the 2010 version?

 

[VoG]

Yes, that was tested using Excel 2010.