Discussion :

[jpenja]

Bonjour,
j'ai crée un usrform sous excel avec une listbox contenue dans une frame.
Je voudrais que lorsque l'utilisateur clique sur la listbox 3 choix s'offre à lui.

Code :

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

1
2
3
4
5
6
7
8
 
Private Sub ComboBox2_DropButtonClick()
 
userform2.combobox2.additem "Mlle"
userform2.combobox2.additem "Mme"
userform2.combobox2.additem "M"
 
End Sub

Cependant (mais c logique) à chq click il me rajoute les trois éléments.
Je n'utilise certainement pas le bon évenement.Quel serait le + approprié pour que la listbox ne contienne que ces trois choix?
Merçi d'avance.

[Thierry_94]

Bonjour,
Pour moi le chargement de la liste box ne doit pas se faire dans l'évènement mais préalablement à l'affichage.
Bon courage

[jpenja]

C vrai qu'il est possible de coder les choix dans l'événement open de thisworkbook mais je pense qu'il doit exister une autre méthode.
sinon à chaque fermeture du usrform il faut penser à vider la listbox.

[patbou]

bonjour,

a l initialisation du userform tu autorise l utilisation du combobox

Code :

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

1
2
 
combobox.enable = true

apres la creation des 3 elements ds la listbox avec ta procedure,
tu rends le controle indisponible

Code :

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

1
2
 
combobox.enable = false

[jpenja]

Merci de ta réponse,mais j'ai procédé autrement.

Activation du usrfrm

Code :

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

1
2
3
4
5
6
7
8
9
 
Private Sub UserForm_Activate()
 
ComboBox2.AddItem "Mme"
ComboBox2.AddItem "Mlle"
ComboBox2.AddItem "M"
Image1.Visible = False
 
End Sub

desactivation du usrfrm

Code :

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

1
2
3
4
5
6
 
Private Sub UserForm_Deactivate()
 
ComboBox2.Value = ""
 
End Sub

Je ne sais pas si c'est ainsi qu'un puriste l'aurait fait mais apparement celà fonctionne.Je ne suis qu'un simple débutant.
s'il y a une méthode plus "respectueuse" je suis preneur.

[zazaraignée]

La beauté de la chose, avec Excel, c'est qu'on peut définir des listes pour nos ListBox. Par exemple, tu peux ajouter une feuille sur laquelle tu définit le contenu de tous tes listBox et ComboBox et autre listes de paramètres (Provinces, régions, titres de politesse, groupe d'âge...). Tu peux définir un nom de plage pour chacune de ces listes. Par exemple tu sélectionne les trois mots,

Mme
Mlle
M

Et tu tapes un nom significatif dans la zone nom (à gauche de la barre de formules). Dans ton userForm, tu sélectionne le ListBox ou le ComboBox et tu mets le nom de ta zone dans la propriété RowSource. Tu peux, par la suite, masquer la feuille qui contient les listes de paramètres (Format > Feuille > Masquer).

Si mes explications ne sont pas assez claires, tu dis.