Bonjour Vivi,
En essayant de te l'expliquer par 11 étapes simples et claires...
1) Tu rentres dans le VBA's word
Donc ALT F11 => VBE (éditeur Visual Basic)
2) tu crées un UserForm
Menu => Insertion => UserForm
3) tu actives la Barre d'outils "Boite à Outils"
Menu => Affichage => "Boite à Outils"
4) tu crées un Bouton
Barre d'outils "Boite à Outils" => "CommandButton" que tu dessinnes sur le userform...
5) tu crées une Liste Déroulante
Barre d'outils "Boite à Outils" => "ListBox" que tu dessinnes sur le userform...
Là c'est fait pour le Design........... Maintenant la programmation...
6) Tu entres dans le Private Module de ton UserForm1
Soit Tu double cliques sur le Userform
Soit Menu => Affichage => Code
7) Tu initialises ton UserForm
Tu vas dans le Private Module ouver en 6)...
En haut à Gauche tu choisis dans la liste déroulante "UserForm1"...
En Haut à Droite tu choisis dans la liste déroulante "Initialize"...
Tu auras ceci :
Private Sub UserForm_Initialize()
End Sub
8) tu remplies ta Liste Déroulante
Private Sub UserForm_Initialize()
ListBox1.AddItem "Toto"
ListBox1.AddItem "Zaza"
ListBox1.AddItem "Titi"
End Sub
9) Tu attribues une commande à ton bouton :
Idem que 7 mais tu choisis :
En haut à Gauche tu choisis dans la liste déroulante "CommandButton1"...
En Haut à Droite tu choisis dans la liste déroulante "Click"...
Tu auras çà :
Private Sub UserForm_Click()
End Sub
10) tu attribue une action à ton CommandButton
Private Sub CommandButton1_Click()
MsgBox "Vous Avez Selectionnez " & ListBox1.Value
End Sub
.......... Voilà ton premier UserForm Vivi !!!
Tout Simple et basic
Bon Aprem
et welcome in XLD and VBA's Word !
@+Thierry