Combobox à remplir? oO

Résolu/Fermé
Ctesias Messages postés 724 Date d'inscription lundi 16 mai 2011 Statut Membre Dernière intervention 1 décembre 2011 - 10 juin 2011 à 09:34
Ctesias Messages postés 724 Date d'inscription lundi 16 mai 2011 Statut Membre Dernière intervention 1 décembre 2011 - 10 juin 2011 à 09:35
Bonjour,

Alors voila, jevous expose mon problème. J'ai un combobox ç remplir avec des valeur d'une cellule.

Voici mon code:


Private Sub UserForm_Initialize()
MsgBox (UserForm2.section)
MsgBox (Cells.SpecialCells(xlLastCell).Row)
If UserForm2.section = W1 Then
    For i = 3 To Cells.SpecialCells(xlLastCell).Row
    ComboBox1.AddItem Sheets("W1").Cells(i, 3)
    Next
End If
End Sub


Mais... Il n'y a aucune valeur dans ma combobox... QUelqu'un saurait ou est mon erreur?

Merci d'avance,

Ctesias

1 réponse

Ctesias Messages postés 724 Date d'inscription lundi 16 mai 2011 Statut Membre Dernière intervention 1 décembre 2011 36
10 juin 2011 à 09:35
Reussi, desolé
0