Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2021 ListBox1 souci de compilation

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous

J'ai un souci de compilation vec ma ListBox

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

cp4

XLDnaute Barbatruc
Bonsoir,

Il n'y a aucun rapport entre "Facturer" et "Facturation"
il faudrait écrire pour case 3 Facturer au lieu de Facturation
 

dysorthographie

XLDnaute Accro
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
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…