Combobox à remplir? oO

Résolu
Ctesias Messages postés 724 Date d'inscription   Statut Membre Dernière intervention   -  
Ctesias Messages postés 724 Date d'inscription   Statut Membre Dernière intervention   -
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   Statut Membre Dernière intervention   36
 
Reussi, desolé
0