Récupération et utilisation de données d'un comboBox dans un UserForm

Bonjour,

Après moult essais infructueux je viens vers vous suite à un problème relativement simple:

Je voudrais que l'utilisateur, via comboBox dans un UserForm, sélectionne une feuille d'un classeur cible pour que celle-ci soit copiée dans le fichier source:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Private Sub ComboBox1_DropButtonClick()   UserForm1.ComboBox1.Clear     For i = 1 To Sheets.Count UserForm1.ComboBox1.AddItem Sheets(i).Name Next i   MsgBox "L'item sélectionné est : " & ComboBox1.Value, vbInformation   End Sub

---

la message box me renvoie un champ vide...:aie:

Avant même de m'atteler à la copie du contenu de la feuille, je n'arrive pas à récupérer le choix de l'utilisateur...

Merci de votre aide !

Il ne faut pas faire comme ça.
Il faut remplir ton ComboBox avant (à l'ouverture du classeur ou autre) et gérer l'évènement SelectionChange plutôt que DropButtonClick.
(Eventuellement tu pourrais garder le remplissage dans le DropButtonClick, mais ça risque de faire des trucs bizarres...)

ok, as-tu une idée de syntaxe pour la structure stp ?

Je disais des bêtises, il faut remplir le ComboBox à l'initialisation du userForm (j'étais parti du principe que c'était un ComboBox d'une feuille de calcul)

Dans UserForm1:

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Private Sub UserForm_Initialize() UserForm1.ComboBox1.Clear   For i = 1 To Sheets.Count UserForm1.ComboBox1.AddItem Sheets(i).Name Next i End Sub   Private Sub ComboBox1_Change() MsgBox "L'item sélectionné est : " & ComboBox1.Value, vbInformation End Sub

---

Ah oui, je comprends mieux ;)

Un très grand merci !

Salut, de la lecture semble indispensable : Utiliser les UserForm en VBA Excel ainsi que Utiliser les contrôles dans un UserForm