Ligne et listbox

[Yann]

Bonjour à tous et à toutes,

Une petite question à vous les experts, est-il possible de sauter des lignes dans une listBox (c'est à dire insérer une ligne vierge entre chaque entré de la liste pour aérer la lecture à l'intérieur).

J'espère avoir été le plus clair possible

Merci beucoup d'avance pour votre aide.

Yann

 

[Ronan]

Bonjour,

Comme ceci :

Private Sub UserForm_Initialize()

Me.ListBox1.AddItem "Coucou"
Me.ListBox1.AddItem ""
Me.ListBox1.AddItem "Re-Coucou"
Me.ListBox1.AddItem ""
Me.ListBox1.AddItem "Re-Re-Coucou"

End Sub

@+

Ronan

 

[omicron]

Bonjour Yann

Tu trouveras en pièce jointe un exemple qui te donneras peut être quelques idées ....

=====================================================
Private Sub CommandButton1_Click()
UserForm1.ListBox1.Clear
For i = 1 To UsedRange.Rows.Count
UserForm1.ListBox1.AddItem "Ligne " & i & " = " & ActiveSheet.Cells(i, 1).Value
UserForm1.ListBox1.AddItem "" '<<<< insertion ligne blanche
Next i
UserForm1.Show
End Sub
=====================================================

Cordialement.

Omicron.

 

[omicron]

Ronan,

Mes excuses pour ne pas avoir vu que tu avais répondu ....
Omicron

 

[Yann]

Merci beaucoup à vous deux !


Yann