Bonjour a toutes et tous, Forum

J'ai un Combobox sur mon Userform et ma liste sur la feuil(Compte) colonne S

je sélectionne un nom de la liste EX: "RDV garage" qui s'affiche bien dans mon Combobox6

Mais dès que l'UserForm est raffaichi "RDV garage" n'ai plus afficher

je resélectionne un autre mot de la liste mais a chaque fois que l'userform

est de nouveau raffraichi, le mot s'efface.

Comment faire svp pour conserver le mot sélectionner dans liste

Merci a vous tous pour l'aide que vous apportez

Une bonne journée

Cordialement Ray


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
 Private Sub UserForm_Initialize()
For i = 1 To Sheets("Compte").[A65000].End(xlUp).Row
 
ComboBox6 = Sheets("Compte").Cells(i, "S")              
 
     If ComboBox6.ListIndex = -1 Then        ' Existe t-il un doublon                  
        ComboBox6.AddItem Sheets("Compte").Cells(i, "S")
     End If   
Next i
End sub