• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Tarih formatı ile toplam alma

  • Konbuyu başlatan Konbuyu başlatan seddur
  • Başlangıç tarihi Başlangıç tarihi
Katılım
12 Nisan 2012
Mesajlar
533
Excel Vers. ve Dili
Microsoft office professional plus 2019
Merhaba.Aşağıdaki kod ile Liste sayfası D sutunundaki tarihe ait F sutunundaki NAKİT toplamlarını aylık olarak almak istiyorum.Ancak koddaki koyu renkli kısmı doğru yazamıyorum.
Yapmak istediğim örneğin 25.01.2023 yazan bir satırdaki ay değerine göre toplam almak.Yani 01 veya ocak değerini ölçüt olarak göstermek istiyorum.Yardımcı olabilirseniz sevinirim.

Private Sub CommandButton1_Click()
lson = Liste.Cells(Rows.Count, "g").End(3).Row
For x = 2 To Liste.Cells(Rows.Count, "d").End(3).Row
dokum.Cells(17, i).Value = WorksheetFunction.SumIfs(Liste.Range("F2:F" & lson), Format(Sheets("Liste").Cells(x, 4), "mmmm"), Sheets("Tablo").Range("o16"), Liste.Range("g2:g" & lson), "=" & "NAKİT")
Next
 

Ekli dosyalar

  • Ekran.4.PNG
    Ekran.4.PNG
    48.5 KB · Görüntüleme: 7
  • Ekran.6.PNG
    Ekran.6.PNG
    48.7 KB · Görüntüleme: 7
Son düzenleme:
Tarih aralığı vererek toplam almayı deneyiniz.

Ocak ayı için örnek;

01.01.2023 / 31.01.2023
 
Tarih aralığını yukarıdaki kodun neresine yazacağım?Örnek verirseniz sevinirim.
 
Aşağıdakine benzer bir yapı olmalıdır.

WorksheetFunction.SumIfs(Toplanacak_Alan, Tarih_Alanı, ">=" & İlk_Tarih, Tarih_Alanı, "<=" & Son_Tarih, Ödeme_Tipi_Alanı, "NAKİT")
 
Geri
Üst