Déselectionner dans un formulaire

Résolu
andy2092 Messages postés 78 Date d'inscription   Statut Membre Dernière intervention   -  
andy2092 Messages postés 78 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai créé un formulaire et une listbox multiselect qui contient plusieurs données. J'aimerai créé un bouton qui permet de tout désélectionner.

Comment puis-je procéder ?

Merci

1 réponse

  1. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
     
    Bonjour,

    Le code de ton bouton à adapter :
        For idx = 0 To ListBox1.ListCount - 1
            If ListBox1.Selected(idx) = True Then ListBox1.Selected(idx) = False
        Next idx
    0
    1. andy2092 Messages postés 78 Date d'inscription   Statut Membre Dernière intervention  
       
      Ca marche niquel ! Merci
      0
    2. andy2092 Messages postés 78 Date d'inscription   Statut Membre Dernière intervention  
       
      Salut ! A chaque fois que j'ouvre mon formulaire, les sélections de la listbox restent présentes. Est-il possible d'appliquer ton code à l'ouverture de mon formulaire (sans utiliser de bouton) pour qu'il n'y ait aucune sélection ? Si oui, comment ?

      Merci !
      0
    3. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
       
      Bonjour,

      Qu'appelles-tu "formulaire" ?
      C'est un userform ou c'est une feuille de saisie où tu as mis ta listbox ?
      0
    4. andy2092 Messages postés 78 Date d'inscription   Statut Membre Dernière intervention  
       
      Bonjour,

      C'est un userform
      0
    5. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
       
      Bonjour,

      Il te suffit donc d'appeler le code de ton bouton à l'activation de ton formulaire :
      Private Sub UserForm_Activate()
          Call CommandButton1_Click
      End Sub
      
      Tu remplaces 'CommandButton1' par le nom de ton bouton bien sûr.
      0