Bonjour,

J'ai dans mon classeur un Userform qui contient des Combobox avec des liste de choix définies par des zones (colonnes) de mon classeur!
Le code de ces combox est typiquement:

        Dim i As Integer
        With ComboBox1
        For i = 3 To 20
            .AddItem Range("D" & i)
        Next i
        .ListIndex = 0
    End With


Le problème est que la colonne "D" se trouve sur la "Feuil3" et donc je n'arrive pas à créer le lien...

Merci beaucoup pour votre aide
Isapel

Salut,
Et avec ceci?

Dim i As Integer With ComboBox1    For i = 3 To 20        Call .AddItem(WorkSheets("Feuil3").Range("D" & i))    Next i    .ListIndex = 0 End With

By Renfield

@+: Ju£i¤n
Pensez: Réponse acceptée

Salut Julien,

Message d'erreur : "L'indice n'appartient pas à la selection"


Private Sub UserForm_Initialize()
 
Dim i As Integer
With ComboBox1
   For i = 3 To 20
       Call .AddItem(Worksheets("Feuil3").Range("D" & i))
   Next i
   .ListIndex = 0
End With