XL 2021 ListBox1 souci de compilation

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous 🙂

J'ai un souci de compilation vec ma ListBox
1690393512559.png

il y a longtemps que je n'ai pas créé de ListBox et je ne sais plus faire lol.
Quelqu'un voudrait bien me dire comment corriger ?
Un grand merci à toutes et à tous 🙂
 
Solution
VB:
Private Sub ListBox1_Click()
    'Select Case Me.ListBox1.ListIndex
    Select Case choix_admin.ListBox1 '.ListIndex
        Case "RétabliMenu"
            RétabliMenu 'macro NON
            'Application.EnableEvents = False
        Case "plein_ecran"
            plein_ecran 'macro OUI
        Case "Facturation"
            Facturation
    End Select
    Unload choix_admin
End Sub
Bonjour à toutes et à tous 🙂

J'ai un souci de compilation vec ma ListBox
Regarde la pièce jointe 1175298
il y a longtemps que je n'ai pas créé de ListBox et je ne sais plus faire lol.
Quelqu'un voudrait bien me dire comment corriger ?
Un grand merci à toutes et à tous 🙂
Bonsoir,

Il n'y a aucun rapport entre "Facturer" et "Facturation"
il faudrait écrire pour case 3 Facturer au lieu de Facturation
 
VB:
Private Sub ListBox1_Click()
    'Select Case Me.ListBox1.ListIndex
    Select Case choix_admin.ListBox1 '.ListIndex
        Case "RétabliMenu"
            RétabliMenu 'macro NON
            'Application.EnableEvents = False
        Case "plein_ecran"
            plein_ecran 'macro OUI
        Case "Facturation"
            Facturation
    End Select
    Unload choix_admin
End Sub
 
VB:
Private Sub ListBox1_Click()
    'Select Case Me.ListBox1.ListIndex
    Select Case choix_admin.ListBox1 '.ListIndex
        Case "RétabliMenu"
            RétabliMenu 'macro NON
            'Application.EnableEvents = False
        Case "plein_ecran"
            plein_ecran 'macro OUI
        Case "Facturation"
            Facturation
    End Select
    Unload choix_admin
End Sub
Merci à toi, c'est beaucoup mieux comme ça 🙂
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
12
Affichages
219
  • Question Question
Microsoft 365 affichage userform
Réponses
4
Affichages
372
Réponses
4
Affichages
347
Retour