Report dans listbox à partir d'une combobox

Bonjour à tous,

J'ai vu plusieurs conversations sur le sujet mais aucune ne m'a permis aujourd'hui de résoudre mon problème :/

Comme indiqué dans le titre, je souhaites remplir une listbox à partir d'une combobox.

Je souhaites ensuite pour chacun des éléments dans la listbox entrer des informations (GAL ok/ non ok) et que celles-ci soit reporter dans un tableau.

Voici le fichier que j'ai réaliser pour le moment

Je vous remercie pour votre aide

Bonjour

comme j'ais du mal a lire les nom des objet a eviter

jais fait avec 2 combobox a voir si sa te va

Dim Sh1 As Object
Dim Sh2 As Object

Private Sub UserForm_Activate()
Dim dernier&, I&
Set Sh1 = Feuil10 ' = CodeName
Set Sh2 = Feuil9
    dernier = WorksheetFunction.CountA(Sh1.Rows(1))
    For I = 1 To dernier
        ComboBox1.AddItem Sh1.Cells(1, I)
    Next
End Sub

Private Sub ComboBox1_Change()
Dim Col&
Col = ComboBox1.ListIndex + 1
    With ComboBox2
        .Clear
        .List = Sh1.Range(Sh1.Cells(2, Col), Sh1.Cells(Rows.Count, Col).End(xlUp)).Value
    End With
End Sub

A+

Maurice

Merci pour ton retour Maurice,

J'ai tenter d'ajouter la fin de ton code mais je dois passer à coté de quelque chose car le code plante.

Afin de faciliter, j'ai mis en commentaire ce à quoi correspondait Pole1.

Voici les modifications réalisées :

[Je suis encore novice sur les macros]

Bonjour

évite de renommer les objets ca évite de chercher

retour de ton fichier

A+

Maurice

Pas de soucis, je ne renommerai plus !

Merci beaucoup pour ton aide