Bonjour,
C'est possible et il ya deux méthodes.
Private Sub UserForm_Initialize()
ListBox1.ColumnCount = 2 '2 colonnes
ListBox1.ColumnWidths = ListBox1.Width / 2 '2 colonnes égales
'**********1ère méthode : Chaque item est entré dans la listbox un à un
For i = 0 To 10
ListBox1.AddItem "Prénom" & Str(i)
ListBox1.List(i, 1) = "Temps" & Str(i)
Next i
'**********2ème méthode : On défini au préalable la liste que l'on incorpore après dans la listbox
Dim MaListe(10, 1)
For i = 0 To 10
MaListe(i, 0) = "Prénom" & Str(i): MaListe(i, 1) = "Temps" & Str(i)
Next i
ListBox1.List = MaListe
End Sub
Bon courage.
Epéna