Discussion :

[halaster08]

Bonjour,

Je cherche un moyen de vérifier si une valeur est dans la selection d'une listbox.
Etant donné mon manque d'expérience en vba j'utilise actuellement une macro qui je pense peut être améliorée.
Pour l'instant je suis obligé d'écrire quelque part dans mon fichier excel la liste des item selectionné puis je vérifie que ma valeur est dans cette liste.
J'aurais aimé savoir si il était possible de s'affranchir de la première étape.

Merci d'avance

[joe.levrai]

Bonjour,

pour récupérer les items sélectionnés, tu dois bien avoir une procédure qui boucle sur l'ensemble des items en vérifiant ceux dont la propriété Selected est à true ?

dans cette boucle, au lieu de faire une copie de la valeur dans une feuille Excel, il te suffit d'introduire ou test If/End If pour tester la valeur de l'item (voir doubler la condition dans le If qui test le Selected, en gros à main levée : If Me.ListBox1.Selected(i) = True And Me.ListBox1.List(i) = "MaValeur")


un exemple de boucle qui parcours tous les items et supprime ceux qu'on a sélectionné, pour te faire une idée :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
With Me.ListBox_AGENTS_CHOISIS
    For i = .ListCount - 1  To 0 Step -1         ' pour chaque ligne
        If .Selected(i) = True Then             ' si la ligne est sélectionnée
            .RemoveItem (i)                     ' suppression
        End If
    Next i
End With

si tu ne procèdes pas ainsi, montre ta procédure