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

That still fails with error 438.

"Peter T" wrote:

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

Regards,
Peter T


"Dave Booker" wrote in message
...
Nope... no objects named "Test" in the workbook.

"Peter T" wrote:

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

"Dave Booker" wrote in message
...
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 Whe=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