#1 Mon 04 August 2008 14:24
- nicolas valls
- Participant assidu
- Date d'inscription: 28 Oct 2005
- Messages: 154
Griser les éléments d'un menu en VBA
Bonjour,
je me suis créé un petit menu contenant des UIButtonControl. Je l'ai créé en me servant de la boite de dialogue "Personnaliser" et en y ajoutant les contrôles.
Mon problème est qu'à l'ouverture je fais une vérification et en fonction de ça je veux griser (rendre non cliquable mais visible) les UIButtonControl. Je n'arrive pas à trouver la méthode adéquate. J'en suis rendu là :
Code:
Sub test() Dim barre As ICommandBar Dim monmenu As ICommandBar Dim element As ICommandItem Dim i As Byte Set barre = Application.Document.CommandBars.Find(ArcID.MainMenu) For i = 0 To barre.Count - 1 If barre.Item(i).Name = "Nouveau menu 1" Then Set monmenu = barre.Item(i): Exit For Next i If monmenu Is Nothing Then Else For i = 0 To monmenu.Count - 1 Set element = monmenu.Item(i) ????????????????????????????? Next i End If End Sub
Que faire de la variable element, car bon je récupère les buttons il me faudrait quelque chose du genre .enable=false mais ca n'existe pas.
Par avance merci
Hors ligne