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
21/02/2021, 00:18

Oğuz Türkyılmaz

(21/02/2021, 00:10)feraz yazdı: Son halşni bir yollayın.Zaten 7 sütunluk değilmi listbox.Ay sütunu yoktu bildiğim listboxtta

Toplam 8 sütun var ben listboxta ilk 7 sütunu gösteriyorum 8 . sütun hesaplamalarda kullanılıyor. Ana Sayfada 8.sütun AY sütunu en son sütun. Tarih sütunundaki ay bilgisini gösteriyor.
21/02/2021, 00:20

feraz

Worksheets("Ana Sayfa").Cells(SonSatir, 7) = CDbl(txt_Tutar)

Yukarıdaki kodun altına attaki kodu eklerseniz Ay olarak ekler.
Bence formülleride böyle yaparsanız dahada hızlanır dosya.

Worksheets("Ana Sayfa").Cells(SonSatir, 8) = Month(txt_MasrafTarihi.Value)
Tabii else satırının üzerinede eklenecek.
21/02/2021, 00:29

feraz

Birde tablo olduğu için formül yani ay sütunu otomatik oluyordu veri girdikçe sizinkinde olmuyor.
Onu ayarlarsam onuda göstereyim en garantilisi önceki vediğim kod.
21/02/2021, 00:34

Oğuz Türkyılmaz

(21/02/2021, 00:29)feraz yazdı: Birde tablo olduğu için formül yani ay sütunu otomatik oluyordu veri girdikçe sizinkinde olmuyor.
Onu ayarlarsam onuda göstereyim en garantilisi önceki vediğim kod.

Type mistmatch hatası veriyor. Tarih formatından kaynaklı sanırım. dd/mm/yyyy ve mm/dd/yyyy şeklinde kodda geçen heryerde değiştirdim iki şekilde de hata veriyor

21/02/2021, 00:38

feraz

Bir gif yaptım.Daha önce dediğim olayı anlatmak için.
Yani tablodaki formüller otomatik oluşuyor alta.
Yani koda 8.sütun yazılmasa bile kendiliğinden oluşması gerek siz yanlış yapmışınız.


21/02/2021, 00:44

Oğuz Türkyılmaz

Mesaj kutunuz kapalı mesaj atamıyorum
1 2 3 4 5 6 7 8 9 10 11 12 13