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