Bonsoir à tous,

J'aurais besoin de votre aide car j'ai créé 2 combobox et je les ai remplis avec la méthode additem je pense (j'ai lié chaque combobox à une colonne dans une autre page Excel du classeur). Le problème est que les combobox affichent par défaut le dernier item non nul de chacune de mes colonnes. J'ai également ajouté une ligne de code pour éviter d'avoir des doublons.

Voici le code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
    Dim i As Integer
    For i = 2 To Sheets("Sheet2").Range("C65536").End(xlUp).Row
        ComboBox1 = Sheets("Sheet2").Range("C" & i)
    If ComboBox1.ListIndex = -1 Then ComboBox1.AddItem Sheets("Sheet2").Range("C" & i)
    Next i
Comment puis-je donc forcer un combobox à afficher par défaut la 1e valeur?

D'avance un grand merci!!