Hi All,

I'm a bit confused here. If I run the command "msgbox
ActiveChart.Name" I get back "Sheet1 Chart 3".

Yet, if I run the command "Charts(3).SetSourceData..." I get a
"subscript out of range" error. This is true if I try 1, 2, 3, 4, 5,
and so on. However, if I run "ActiveChart.SetSourceData..." it works,
thus I know the issue is with the "Charts(3)" portion of the line.

What am I doing wrong?

Thanks!

Trip

Hi Trip

The parent of a chart on a worksheet is a ChartObject

Dim chtObj as ChartObject
Dim cht as Chart

Set chtobj = ActiveSheet.Chartobjects("Chart 3")
Set cht = chtobj.Chart

msgbox chtobj.Name & vbcr & cht.Name

cht..SetSourceData...

BTW, if you did not "Activesheet.Charts(3)" but
Activesheet.Chartobjects(3).Chart,
you would pick up the 3rd Chartobject's chart on the sheet according to its
index order, which is not necessarily related to the '3' in its name.

Regards,
Peter T

"Trip" <(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
> Hi All,
>
> I'm a bit confused here. If I run the command "msgbox
> ActiveChart.Name" I get back "Sheet1 Chart 3".
>
> Yet, if I run the command "Charts(3).SetSourceData..." I get a
> "subscript out of range" error. This is true if I try 1, 2, 3, 4, 5,
> and so on. However, if I run "ActiveChart.SetSourceData..." it works,
> thus I know the issue is with the "Charts(3)" portion of the line.
>
> What am I doing wrong?
>
> Thanks!
>
> Trip
>