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
"Dave Booker" <(E-Mail Removed)> wrote in message
news:151EEC18-EADD-4EDA-BBA7-(E-Mail Removed)...
> Tried that -- single-line macro that just calls the .Location method with
> Where:=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" <(E-Mail Removed)> wrote in message
> > news:94F2534B-8B0D-4A8F-A1D3-(E-Mail Removed)...
> > > 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" <(E-Mail Removed)> wrote in message
> > > > news:040568AA-80E3-4F19-AB81-(E-Mail Removed)...
> > > > > 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
> > > > >
> > > >
> > > >
> > > >
> >
> >
> >
|
Similar Threads
