Combo à 2 colonnes

Comment faut il faire pour insérer les données dans les 2 colonnes d'un combo à 2 colonnes .. Merci Beaucoup.

'permet d'ajouter l'élément "coucou1"
ComboBox1.AddItem "coucou1"

'permet d'ajouter à la colonne 1 de l'élément d'indice 0 le mot "coucou"
ComboBox1.List(0, 1) = "coucou"


^^^^^
[° o o °]
( || )
\/



-------------------------------
Réponse au message :
-------------------------------

Comment faut il faire pour insérer les données dans les 2 colonnes d'un combo à 2 colonnes .. Merci Beaucoup.

i = 0
Range("B2").Select
While ActiveCell.Value <> ""
'Ajout d'une ligne
Ls_Nom.AddItem
'Tu rempli la 1ère colonne (0) de la ligne i
Ls_Nom.Column(0, i) = ActiveCell.Value
ActiveCell.Offset(0, 1).Activate
'Tu rempli la 2ème colonne (1) de la ligne i
Ls_Nom.Column(1, i) = ActiveCell.Value
ActiveCell.Offset(1, -1).Activate
i = i + 1
Wend




-------------------------------
Réponse au message :
-------------------------------

Comment faut il faire pour insérer les données dans les 2 colonnes d'un combo à 2 colonnes .. Merci Beaucoup.

-------------------------------
Réponse au message :
-------------------------------

> Comment faut il faire pour insérer les données dans les 2 colonnes d'un combo à 2 colonnes .. Merci Beaucoup.
>