Listes déroulantes dans un formulaire

bonsoir

débutant en VBA j ai un formulaire destiné a saisir des références de produits

a l ouverture du formulaire, je souhaite que la combobox soit chargé des produits qui figurent dans la feuille 2 de mon classeur

en choisissant un produit l utilisateur aura alors une listbox lui proposant des références

j ai essayé les codes suivants mais cela ne fonctionne pas

Charge la combobox

Private Sub UserForm1_Initialize()
    For i = 1 To 2
        ComboBox_Produits.AddItem Cells(1, i)
    Next

End Sub

Propose les références dans la listbox

Private Sub ComboBox_Produits_Change()
ListBox_References.Clear

Dim no_colonne As Integer, nb_lignes As Integer

no_colonne = ComboBox_Produits.ListIndex + 1

nb_lignes = Cells(1, no_colonne).End(xlDown).Row

For i = 2 To nb_lignes
    ListBox_References.AddItem Cells(i, no_colonne)

    Next
End Sub

Affiche le choix de l utilisateur dans la textbox

Private Sub ListBox_References_Click()
    TextBox_Choix.Value = ListBox_References.Value
End Sub

merci d'avance pour votre aide

désolé c'est mieux avec le formulaire modifié

Bonjour voici les codes modifiés.

Private Sub ComboBox_Pays_Change()
    ListBox_Villes.Clear
    Dim no_colonne As Integer, nb_lignes As Integer
    no_colonne = ComboBox_Pays.ListIndex + 1
    nb_lignes = Cells(1, no_colonne).End(xlDown).Row
    For i = 2 To nb_lignes
        ListBox_Villes.AddItem Cells(i, no_colonne)
    Next
End Sub

Private Sub ListBox_Villes_Click()
TextBox1.Value = ListBox_Villes.Value
End Sub

Private Sub UserForm_Initialize()
For i = 1 To 4
ComboBox_Pays.AddItem Cells(1, i)
Next
End Sub

La première erreur venait de Userform_Initialize, vous c'était écrit Userform1_initialize

La deuxième était le nom du contrôle textbox. Dans le tutoriel il est sous le nom TextBox_Choix alors que dans votre classeur il est sous le nom Textbox1.

Cordialement

Merci beaucoup pour la réponse rapide

je teste et notifie résolu si ok

merci encore

cordialement

J'ai pris le soin de tester avant

j imagine et je vous remercie

en fait je dois l adapter pour un autre besoin avec des références différentes

mais je vais y arriver

Oui je l'ai deviné. l'adaptation est plus facile quand à l'origine le code fonctionne...

Yes et là çà fonctionne

j en profite :

je dois effectivement l adapter mais les "pays " et les "Villes" seront dans une feuille "données" différentes de la feuille où apparaitra le formulaire

je suppose qu il faut le préciser dans les codes ?

D'avance merci

Oui, voire préciser le classeur au besoin

ce sera dans le même classeur

je creuse et je reviens si je cale

par contre là je vais aller me coucher car il est 2 heures du mat à la Réunion

bonne nuit

Bonne nuit