Can't activate chart

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Michael Smith - 20 Jan 2006 18:45 GMT

Hopefully someone knows this one quickly,..if so please help

This line fails when i run my macro, however when I step through line by
line, the macro works.

ActiveSheet.ChartObjects("Chart 1").Activate

Is there anyway to say..."active the chart that exists on this
worksheet"..is that the way to do it?

Thanks,
Mike

Reply to this Message

Dave Peterson - 20 Jan 2006 19:36 GMT

Option Explicit
Sub testme()

Dim wks As Worksheet
Set wks = ActiveSheet
With wks
If .ChartObjects.Count > 0 Then
.ChartObjects(1).Activate
End If
End With
End Sub

maybe...

> Hopefully someone knows this one quickly,..if so please help
>
[quoted text clipped - 10 lines]
>
> *** Sent via Developersdex http://www.developersdex.com ***

Signature

Dave Peterson

Reply to this Message