Chart .Location failures

[Guest]

I am unable to set the Location of a ChartObject using Excel 2003, VB 6.3.

The following code will return either Error 1004 or Run-time error '438':
Object doesn't support this property or method.

ActiveChart.Location Where:=xlLocationAsNewSheet, Name:="Test"

However ActiveChart seems to be valid because immediately before (or after
if the .Location line is commented out) other properties can be changed, e.g.:

ActiveChart.Axes(xlValue, xlSecondary).MaximumScale = 0.6

 

[Peter T]

As a guess, you already have a chart sheet named "Test".
If so you'll need to rename that one, or delete it, or apply a different
name for your new chart sheet.

Regards,
Peter T

 

[Guest]

Nope... no objects named "Test" in the workbook.

As a guess, you already have a chart sheet named "Test".
If so you'll need to rename that one, or delete it, or apply a different
name for your new chart sheet.

Regards,
Peter T

 

[Peter T]

Manually select your chart, just to be sure, and in your code change
Name:="Test"
to
Name:="UniqueName"

Regards,
Peter T

 

[Guest]

Tried that -- single-line macro that just calls the .Location method with
Where:=xlLocationAsNewSheet, Name:="UniqueName"

That still fails with error 438.

 

[Peter T]

Then I'm out of ideas. Your original code is fine, subject an active chart
exists and no similarly named chart-sheet exists.

Regards,
Peter T