Déactiver une selection multiple dans une lisbox

Résolu
Bonjour,
Je suis entrain de développer un code en VBA sous Excel, et je suis confronté au problème suivant:
J'ai deux listbox. listbox1 en choix unique et listbox2 en choix multiple. J'aurai aimé savoir comment faire pour déactiver la sélection multiple (aucun élément en bleu) dans listbox2 quand on clique sur un élément de la listbox1.

Merci d'avance pour votre aide.

3 réponses

  1. Modérateur
    Bonjour,

    Tu peux utiiser "Private Sub ListBox1_Change()" et la propriété "ListBox2.Hide" ou "ListBox2.Show"
    1. Bonjour,

      Private Sub ListBox1_Change()
          Me.ListBox2.MultiSelect = fmMultiSelectSingle
          Me.ListBox2.Value = ""
          Me.ListBox2.MultiSelect = fmMultiSelectMulti
      End Sub
      1. Bonjour,
        Je viens de tester ta proposition. Cela marche du tonnerre!!!!
        Merci pour ton aide.
        Merci aux autres pour leur contribution.
    2. Bonjour Dar, bonjour le forum,

      Peut-être comme ça :

      Private Sub ListBox1_Change()
      For I = 0 To Me.ListBox2.ListCount - 1
          Me.ListBox2.Selected(I) = False
      Next I
      End Sub