Excel VBA 1004 Error!!!

[bobbyzulauf]

First time poster having trouble finding resolution with a Macro I created. I have tested this macro on multiple computers, Mac Excel 2011, PC Excel 2007, 2010, and 2013.

For some reason , when one user attempts to run this macro on their PC using Office 2011, they receive a Run Time 1004 Error Application-defined or object defined error. Basically the Macro stops before the first chart could be created. The other computer that I tested using the same exact Office version does not have this problem. The debugger opens up to the error occuring on the Active.Sheet.Shapes.AddChart.Select line.

Like I said, this macro works on multiple computers and I have no clue what I should do next.

Here is a snippet of the code

Range("B2").Select
Selection.Font.Bold = True
Range("B20:B36,E20:E36").Select
Range("E20").Activate
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlPie
ActiveChart.SetSourceData Source:=Range( _
"Analysis!$B$20:$B$36,Analysis!$E$20:$E$36")
ActiveChart.ApplyLayout (4)

 

[JLGWhiz]

First time poster having trouble finding resolution with a Macro I created. I have tested this macro on multiple computers, Mac Excel 2011, PC Excel 2007, 2010, and 2013.

For some reason , when one user attempts to run this macro on their PC using Office 2011, they receive a Run Time 1004 Error Application-defined or object defined error. Basically the Macro stops before the first chart could be created. The other computer that I tested using the same exact Office version does not have this problem. The debugger opens up to the error occuring on the Active.Sheet.Shapes.AddChart.Select line.

Like I said, this macro works on multiple computers and I have no clue what I should do next.

Here is a snippet of the code

Range("B2").Select
Selection.Font.Bold = True
Range("B20:B36,E20:E36").Select
Range("E20").Activate
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlPie
ActiveChart.SetSourceData Source:=Range( _
"Analysis!$B$20:$B$36,Analysis!$E$20:$E$36")
ActiveChart.ApplyLayout (4)

Remove the '.Select' and see if that cures it. The chart should automatically be selected when it is added.

 

[bobbyzulauf]

No Luck...removing ".Select" will first create a Bar Graph and then the chart is not selected to modify it to a Pie Chart. I confirmed this on my computer in which the Macro already works on.

First time poster having trouble finding resolution with a Macro I created. I have tested this macro on multiple computers, Mac Excel 2011, PC Excel 2007, 2010, and 2013.

For some reason , when one user attempts to run this macro on their PC using Office 2011, they receive a Run Time 1004 Error Application-defined or object defined error. Basically the Macro stops before the first chart could be created. The other computer that I tested using the same exact Office version does not have this problem. The debugger opens up to the error occuring on the Active.Sheet.Shapes.AddChart.Select line.

Like I said, this macro works on multiple computers and I have no clue what I should do next.

Here is a snippet of the code

Range("B2").Select
Selection.Font.Bold = True
Range("B20:B36,E20:E36").Select
Range("E20").Activate
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlPie
ActiveChart.SetSourceData Source:=Range( _
"Analysis!$B$20:$B$36,Analysis!$E$20:$E$36")
ActiveChart.ApplyLayout (4)