Bonjour,

A mon programme, j'ai inséré une barre d'outils (Toolbar1). Au bouton numéro 7, je lui ai adjoint 2buttonmenus...mais je n'arrive pas à définir le code correspondant à ces 2 menus boutons. J'ai été voir l'aide en ligne et voilà ce que j'ai trouvé comme solution mais on me dit "Type défini par l'utilisateur non défini". Comment faire?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Private Sub Toolbar1_ButtonMenuClick(ByVal ButtonMenu As ComctlLib.ButtonMenu)
   Select Case ButtonMenu.index
   Case 1
        Text2.Visible = True
        Label6.Visible = True
        cmdValider.Visible = True
 
 
        rcFilm.Find "Numéro_Salle = " & txtEdit(0).Text & " "
   Case 2
      MsgBox "Vous avez cliqué sur l'option 2"
   End Select
End Sub