excel vba - get the name of the clicked menu item -


is there way name of clicked menu item? have created new add-in file menus , sub-menus. can name of sub-menu clicked used inside macro?

for example:

sub auto_open()  dim newcontrol commandbarpopup dim mitem, submenu on error resume next call auto_close  set newcontrol = application.commandbars("worksheet menu bar").controls.add(type:=msocontrolpopup, temporary:=true) newcontrol.caption = "&menu"  set mitem = newcontrol.controls.add(type:=msocontrolbutton) mitem     .caption = "sub-menu1"     .onaction = "submenu1" end  set mitem = newcontrol.controls.add(type:=msocontrolbutton) mitem     .caption = "sub-menu2"     .onaction = "submenu2" end  set mitem = newcontrol.controls.add(type:=msocontrolbutton) mitem     .caption = "sub-menu3"     .onaction = "submenu3" end  on error goto 0  end sub 

so above code creates add-in ribbon button "menu" , sub-menus "sub-menu1, sub-menu2 , sub-menu3".

if click of sub menus need message box displaying name of menu clicked.

the actioncontrol property of commandbars object tell menu item clicked call code.

dim ctl commandbarcontrol  set ctl = application.commandbars.actioncontrol 

Comments