Récupérer liste de données dans cellule pour affichage dans combobox

Bonjour à tout le forum :)

Je cherche à récupérer une liste de données présentes dans la cellule C2 (validation de données) de ma feuille "Index" pour l'afficher dans le UserForm "JB" en Combobox1. Est-ce possible ? Sinon je devrais passer par une liste de données renseignée dans plusieurs cellules Excel mais ça ne m'arrange pas !

Merci à tous pour vos propositions !

Bon dimanche :)

Bonjour,

Sub Test()

Dim AireValidation As Range

    With Range("ClientRecherche")  '  = votre cellule C2
         Set AireValidation = Range(.Validation.Formula1)
         Debug.Print AireValidation.Address
    End With

    With JB

         .ComboBox1.List = AireValidation.Value
         .Show

    End With

    Set AireValidation = Nothing

End Sub

Plus simplement :

    With JB

         .ComboBox1.List = Range(Sheets("Index").Range("C2").Validation.Formula1).Value
         .Show

    End With

Bonjour Eric,

Merci pour votre contribution mais je n'y suis pas parvenu, qu'ai-je mal fait ?

c'est bien dans le Initialize qu'il faut renseigner ce code ?

Bonne journée

JB

J'ai modifié votre liste de validation