How to identify the clicked shape name in VBA

vba excel

You should be able to get the name of the clicked shape by using Application.Caller

usage as shown

 CallingShapeName = ActiveSheet.Shapes(Application.Caller).Name  msgbox CallingShapeName

vba excel

ActiveSheet.Shapes(Application.Caller).TextFrame.Characters.Text

CodeHunter