Listbox'ta 2.ve 3. Sütındaki Verileri Sağa Hizalama

A

ahmedummu

Misafir
Merhaba arkadaşlar.

Listboxtaki 2. ve 3. sütunlardaki verileri nasıl sağa yaslayabilirim. Yusuf bey'in verdiği kodlara aşağıdaki kırmızı olan satırları ekledim ama olmadı. Yardımcı olursanız sevinirim.

ListBox2.Clear
ListBox2.ColumnCount = 4
ListBox2.ColumnWidths = "30;185;50;50"
a = 0
For i = 10 To 24
If sy.Cells(i, "A") <> "" Then
ListBox2.AddItem
ListBox2.List(a, 0) = sy.Cells(i, "A")
ListBox2.List(a, 1) = sy.Cells(i, "B")
ListBox2.List(a, 2) = Format(sy.Cells(i, "g"), "#,##0.00")
ListBox2.List(a, 2).TextAlign = fmTextAlignRight
ListBox2.List(a, 3) = Format(sy.Cells(i, "h"), "#,##0.00")
ListBox2.List(a, 3).TextAlign = fmTextAlignRight
a = a + 1
End If
Next
 

YUSUF44

Destek Ekibi
Destek Ekibi
Katılım
4 Ocak 2006
Mesajlar
12,084
Excel Vers. ve Dili
İş : Ofis 365 - Türkçe
Ev: Ofis 365 - Türkçe
Bildiğim kadarıyla listboxta böyle bir değişiklik yapılamıyor. Listview'de olabiliyormuş.
 

YUSUF44

Destek Ekibi
Destek Ekibi
Katılım
4 Ocak 2006
Mesajlar
12,084
Excel Vers. ve Dili
İş : Ofis 365 - Türkçe
Ev: Ofis 365 - Türkçe
Listview 64 bitlerde yok galiba. Bende de görünmüyor. Ancak ilginçtir, başkalarının hazırladığı dosyalardaki listviewleri görebiliyorum.
 
Üst