Probeme cellule avec plusieur lignes

[albator76140]

Bonjour a tous

Voici mon probleme...

Comment faire apparaitre le contenu d'une cellule qui contient plusieurs lignes dans une Listview...

exemple : la Cellule A21 contient les lignes suivantes:

PCBA CHASSIS S6
PLASTIC STAND-OFF D4,4X6,4
PWR INS SHEET S6


Merci d'avance a tout ceux qui pourront m'aider

 

[ninbihan]

Re : Probeme cellule avec plusieur lignes

Bonjour le forum et Albator,

Tu peux essayer cela:

Private Sub UserForm_Initialize()
Dim tablo() As String
tablo() = Split(Range("a21").Value, Chr(10))
For i = 0 To UBound(tablo)
ComboBox1.AddItem tablo(i)
Next i
End Sub

Bonne journée,

Ninbihan