Excel Userform Da Listbox Nesnesi Alanlarının Biçimlendirmesi Hakkında.

1 2 3 4 5 6 7 8 9 10 11 12 13
20/02/2021, 16:41

feraz

ilgili kodu alttaki gibi değiştiriseniz gereksiz boş satırlar alınmaz ve sütun başlıklarda gelir.
Ayrıca resimdeki gibi 7.satırdan itibaren silin.Tabloya veri eklendikçe otomatik olarak formüller vs.. de eklenir abey.
Masraf listesi yerine Tablo1 den veri almak en mantıklısı dinamik olarak.



Private Sub UserForm_Initialize()
    With Me.ListBox1
        .ColumnCount = 7
        .ColumnHeads = True
        .RowSource = "Tablo1"
        .ColumnWidths = "30;70;70;70;240;170;70"
    End With
    txt_MasrafTarihi = Format(Date, "dd.mm.yyyy")
End Sub

sonuç olarak listboxtta alttaki gibi başlıklı listelenir.


20/02/2021, 17:10

Oğuz Türkyılmaz

Feraz Hocam 9.mesajınızdaki Kod da işimi görmüştü ama boş satırları almaz dediğiniz için bu kodu uyguladım belki hızda avantajı olur diyerek çok Teşekkür ederim. Şu TL tutarlarının görünümününde sağa dayalı olabilmesi için Berduş hocamın olmayan şapkadan tavşan çıkarmasını umud ediyorum artık.


20/02/2021, 17:24

berduş

yalnız tavşanı gördüm ben, vardı)
orada 2 sorun var 1.si o mesajdaki yöntem için dizi kullanmak gerekecek
2. sorun da bundan kaynaklanıyor dizi ile aktarırken başlık olarak ekleyemiyorsunuz diye biliyorum, emin değilim,
başlıkların görünebilmesi için 2 bir liste kutsu yada başlık alanları için etiket gerekebilir
aşağıdaki bağlantıyı da inceleyebilirsiniz
https://wellsr.com/vba/2017/excel/align-...m-listbox/
20/02/2021, 17:26

feraz

Son mesajınızdaki resimdeki zaten olmamış.Yani sütun adları listboxtta çıkıyor başlıksız.Son kodu ekleseydiniz daha mantıklı olurdu abey.
20/02/2021, 17:32

Oğuz Türkyılmaz

(20/02/2021, 17:26)feraz yazdı: Son mesajınızdaki resimdeki zaten olmamış.Yani sütun adları listboxtta çıkıyor başlıksız.Son kodu ekleseydiniz daha mantıklı olurdu abey.

Öyle yaptım zaten sadece ekran görüntünü eski kodunkini koymuşum sadece.
20/02/2021, 17:33

feraz

Eğer rowsource yerine dizi yada Ado yada additem yöntemi ile alırsanız sağa yaslanır.
Bunun için başlıklar olarak labeller kullanılır ve tutardan önceki sütun genişliği biraz fazla yapılıp sağa kaydırılır tutar sütunu listboxtta.

Abey illede sağa yaslanak diyorsanız ayarlayayım dosyanızı.
Son güncel olanı ekleyin ona göre düzenleyeyim istiyorsanız zor olmaz zaten.
1 2 3 4 5 6 7 8 9 10 11 12 13