Largeur de colonne d'une Listbox

[Lorine]

Bonsoir au forum ,

Voila j'ai une listbox qui est remplie à partir de 2 colonnes.
Je voudrais règler la largeur de ces "colonnes" dans la listebox:
2 cm pour la première colonne et 10 pour la deuxième.

Cela est il possible ?

Private Sub UserForm_Initialize()


ListBox1.ColumnCount = 2


ListBox1.List = Sheets("feuille1").Range("B63:C163").Value



End Sub

 

[Pierrot93]

Re : Largeur de colonne d'une Listbox

Bonjour lorine, Jean-Marcel

essaye ainsi :

Private Sub UserForm_Initialize()
With ListBox1
    .ColumnCount = 2
    .ColumnWidths = Application.CentimetersToPoints(2) & _
        ";" & Application.CentimetersToPoints(10)
    .List = Sheets("feuille1").Range("B63:C163").Value
End With
End Sub

bonne soirée
@+

 

[Lorine]

Re : Largeur de colonne d'une Listbox

Merci pour votre aide .

Serait il possible d'aligner le texte de la première colonne au centre et le deuxième à gauche ?

 

[Pierrot93]

Re : Largeur de colonne d'une Listbox

Re,

il existe la propriété "TextAlign", mais elle s'appliquera de façon identique à toutes les colonnes... Voir peut être du coté des "listview", mais l'utilisation est plus ardue...