Hi Andrew,

If you create your menu like this:

Sub CreateMyMenu()
With Application.CommandBars("Worksheet Menu Bar"). _
Controls.Add(Type:=msoControlPopup, Temporary:=False)
.Caption = "My Menu"
With .Controls.Add(Type:=msoControlButton)
.Caption = "Item 1"
.Tag = "Item 1"
End With
With .Controls.Add(Type:=msoControlButton)
.Caption = "Item 2"
.Tag = "Item 2"
End With
End With
End Sub

You should be able to use a routine like this to enable/disable a given
control via its Tag property:

Sub ToggleMenuItem(rsTag As String, rbEnabled As Boolean)
Application.CommandBars.FindControl(Tag:=rsTag). _
Enabled = rbEnabled
End Sub


--
Regards,

Jake Marx
MS MVP - Excel
www.longhead.com

[please keep replies in the newsgroup - email address unmonitored]


Andrew Kennard wrote:
Hi all

I've created my own custom menu and added items to it.

eg My Menu, Item1, Item 2 etc

I would like to be able to change the enabled property of each item
inside certain subs. But no matter what I try I can't seem to 'get a
hold' on the ITEM to change it's state ? I have sucessfully changed
the state of the MENU to enabled true/false but not indiviual items.

I've done lots of googling but still have no luck with simlar 'delete'
examples that I presume should work. The main problem sees to be even
adding Tag properties I cannot use FindControls to find an ITEM

TIA

Andrew