• DİKKAT

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

Devreden Bakiye

umit1907

Altın Üye
Katılım
9 Mayıs 2007
Mesajlar
231
Excel Vers. ve Dili
365 TR
Merhabalar,
Ekteki dosyada herşey güzel çalışıyor fakat 2 tarih arası filitre verdiğimde devreden bakiyeyi hesaplatamadım. Yardımcı olabilirmisiniz.
 

Ekli dosyalar

Borç için

=SUMIFS(tbl_FislerDetay!F2:F1048576;tbl_FislerDetay!A2:A1048576;"<"&D3)


Alacak İçin

=SUMIFS(tbl_FislerDetay!G2:G1048576;tbl_FislerDetay!A2:A1048576;"<"&D3)
 
Çok teşekkürler. Ama bunu makronun içerisinde yapabilme şansımız varmıdır.
 
Dim S1 As Worksheet, Borc As Double, Alacak As Double
Set S1 = Sheets("tbl_FislerDetay")
Borc = Application.WorksheetFunction.SumIfs(S1.Range("f2:f1048576"), S1.Range("A2:A1048576"), "<" & CLng(CDate(Sheets("muavin").Range("d3").Value)))
Alacak = Application.WorksheetFunction.SumIfs(S1.Range("G2:G1048576"), S1.Range("A2:A1048576"), "<" & CLng(CDate(Sheets("muavin").Range("d3").Value)))
Range("E19").Value = Format(Replace(Borc, ".", ","), "#,##0.00")
Range("F19").Value = Format(Replace(Alacak, ".", ","), "#,##0.00")
 
çok teşekkürler elinize sağlık
 
Geri
Üst