UserForm, selection de mots clés via listbox!

[Provence Vintage]

Bonjour le Forum,

Je suis en train de monter un UserForm avec 5 ListBox;
La première me permet de choisir une valeur, qui conditionnera les 4 autres listes, les choix sont reportés dans des cellules!

Deux possibilitées de recherche liste1 ou liste2, je ne sais pas laquelle permet d'écrire le plus facilement le code!

Pouvez vous me filer un coup de main pour écrire le code de la première ListBox, conditionnant les autres, et celui de la deuxième (conditionné par la 1)
Ci-joint ex fichier xl!

Merci à tous

 

[ledzepfred]

Re : UserForm, selection de mots clés via listbox!

RE...

skoobi a été plus rapide que moi.
Par contre si on ne sélectionne pas 4 mots clés mais que l'on clique sur valider, alors la propriété listindex de tes listbox est illisible donc c'est le bug

solution : ajouter dans le code du commandbutton un bout de code pour forcer la sélection de quatre mots clés

Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
For i =1 to 4
If Me.Controls("Listbox" & i).ListIndex = -1 Then
MsgBox ("Choisir un mot clé dans chaque liste"): Exit Sub
End If
Next

ou en plus court

On Error Resume Next
If Err = 381 Then Exit Sub

Maintenant si on est pas obligé de sélectionner quatre mot clés, ça se complique

a+