Specifically I'm looking for the control Id for Insert - Column
--
PK9


"Ron de Bruin" wrote:

Hi

See
http://www.rondebruin.com/menuid.htm

Sub test()
Application.CommandBars("Worksheet Menu Bar").FindControl _
(ID:=296, Recursive:=True).Enabled = False
End Sub




--
Regards Ron de Bruin
http://www.rondebruin.nl


"PK9" wrote in message ...
I have a macro for which I do some conditional checks in the SelectionChange
event for a worksheet.

When one of my conditions evaluates to true I'm trying to do the following:
*) Disable the Insert - Rows menu option (from the main menu bar at the top
of Excel)


I have tried many different things. The closest I can get is to disable the
"Insert" control entirely (which is not acceptable). I only want to disable
the "Insert Rows" option.

The following code disables the entire "Insert" control on the Worksheet
Menu Bar:
Application.CommandBars("Worksheet Menu Bar").Controls("Insert").Enabled =
False

I CAN'T figure out how to disable the Rows option underneath the Insert
control though!! Any help would be greatly appreciated.

Thanks


--
PK9