Hi All,
I have a spread sheet with several different chart objects within it.
I would like to write a simple macro so that If I cick (select) any one of
the charts with-in the current spread sheet I am viewing and than run my
macro, a msgbox will pop up and give me the Name of the chart object and the
index number of the chart object.

Any help would be greatly appreciated
Thanks,
Dan Thompson.

Hi,

Try this,

Sub x()
With ActiveChart.Parent
MsgBox .Name & " Index " & .Index
End With
End Sub

Cheers
Andy

Dan Thompson wrote:
Hi All,
I have a spread sheet with several different chart objects within it.
I would like to write a simple macro so that If I cick (select) any one of
the charts with-in the current spread sheet I am viewing and than run my
macro, a msgbox will pop up and give me the Name of the chart object and the
index number of the chart object.

Any help would be greatly appreciated
Thanks,
Dan Thompson.

--

Andy Pope, Microsoft MVP - Excel
http://www.andypope.info

Thanks Andy that seemd to do the trick.

Dan Thompson.

"Andy Pope" wrote:

Hi,

Try this,

Sub x()
With ActiveChart.Parent
MsgBox .Name & " Index " & .Index
End With
End Sub

Cheers
Andy

Dan Thompson wrote:
Hi All,
I have a spread sheet with several different chart objects within it.
I would like to write a simple macro so that If I cick (select) any one of
the charts with-in the current spread sheet I am viewing and than run my
macro, a msgbox will pop up and give me the Name of the chart object and the
index number of the chart object.

Any help would be greatly appreciated
Thanks,
Dan Thompson.

--

Andy Pope, Microsoft MVP - Excel
http://www.andypope.info