ListBox

Bonsoir Charles,
Pour le texte pas de problème puisque par défaut l'alignement est à gauche
mais pour l'alignement à droite des chiffres, en remplissant à gauche avec
des espaces :

Private Sub UserForm_Initialize()

Dim Texte As String

With Me.ListBox1
.ColumnCount = 2
.ColumnWidths = "45;40"
.AddItem "Element 1"
.AddItem "Element 2"
.AddItem "Element 3"
.AddItem "Element 4"
Texte = 1
Texte = Space(20 - Len(Texte) * 2) & Texte
.Column(1, 0) = Texte
Texte = 20
Texte = Space(20 - Len(Texte) * 2) & Texte
.Column(1, 1) = Texte
Texte = 300
Texte = Space(20 - Len(Texte) * 2) & Texte
.Column(1, 2) = Texte
Texte = 4000
Texte = Space(20 - Len(Texte) * 2) & Texte
.Column(1, 3) = Texte
End With

End Sub

Hervé.

"Charly" <nospam-charles.schauss@cegecom.lu> a écrit dans le message de
news: u93m0vP9FHA.912@TK2MSFTNGP10.phx.gbl...

Bonjour,

Est-il possible, dans un ListBox à plusieurs colonnes, de modifier
l'alignement des données.
(ex. Les colonnes nombres alignées à droite et les colonnes texte avec
l'alignement à gauche)?

Merci pour votre aide

Charles

Bonjour Charly,

Il y a une propriété TextAlign que tu dois mettre à 3-frmtextAlignRight

Évidemment, cela s'applique à toutes les colonnes et non seulement à une ....


Salutations!


"Charly" <nospam-charles.schauss@cegecom.lu> a écrit dans le message de news: u93m0vP9FHA.912@TK2MSFTNGP10.phx.gbl...
Bonjour,

Est-il possible, dans un ListBox à plusieurs colonnes, de modifier
l'alignement des données.
(ex. Les colonnes nombres alignées à droite et les colonnes texte avec
l'alignement à gauche)?

Merci pour votre aide

Charles