Sayfa2'Den Sayfa3'E Tarihe Göre Toplam

[Yaren Eslem]

Aşağıdaki kodu Sayfa3'e nasıl toplam alabiliriz? Yardımcı olur musunuz arkadaşlar?

Aşağıdaki Formül Sayfa2'De olup Sayfa3'E Toplam alınacak

=ÇOKETOPLA($C$4:$C$6012;$A$4:$A$6012;">=01/10/2019";$A$4:$A$6012;"<=31/10/2019")

 

[tamer42]

Aşağıdaki kodu Sayfa3'e nasıl toplam alabiliriz? Yardımcı olur musunuz arkadaşlar?

Aşağıdaki Formül Sayfa2'De olup Sayfa3'E Toplam alınacak

Bu mudur istediğiniz?

=ÇOKETOPLA(Sayfa2!$C$4:$C$6012;Sayfa2!$A$4:$A$6012;">=01/10/2019";Sayfa2!$A$4:$A$6012;"<=31/10/2019")

 

[Yaren Eslem]

Formül Çalışıyor, çok teşekkür ederim; kusuruma bakmaz iseniz bir ekleme yapabilir miyim?

Sonradan ortaya çıktığı için bende ekleme yapmam gerekiyor; Bu formülü bir değere göre yine tarih aralığı toplam yaptırabilir miyiz?

Örneğin D Sütununda banka isimleri var, içinde sadece "Akbank" geçenleri tarih aralığında topla gibi mesela, olur mu?

 

[çıtır]

Deneyiniz.

=ÇOKETOPLA(Sayfa2!$C$4:$C$6012;Sayfa2!$A$4:$A$6012;">=01/10/2019";Sayfa2!$A$4:$A$6012;"<=31/10/2019";Sayfa2!$D$4:$D$6012;"Akbank")

 

[Yaren Eslem]

Allah hepinizden razı olsun, çook teşekkürlerrr @çıtır, @tamer42

 

[çıtır]

Allah hepinizden razı olsun, çook teşekkürlerrr @çıtır, @tamer42

Allah(C.C.) Cümlemizden razı olsun.Dönüş yaptığınız için teşekkür ederim.

 

[1mak1mak]

Merhaba
Yukarıdaki örneğe göre Farklı sayfada Tarihe aralığına göre Renklere göre değerleri toplamak istedim ama olmadı.
Renklere Göre Değerleri Toplama işleminde Makro kullanıyorum. Kendi sayfasında çalışıyor
Aynı formülü aynı dosya içinde faklı sayfada yaptığımda tarih aralığı olmadan bile veri gelmiyor.
Üstelik ben Renklere göre Tarih aralığında Toplam almak istiyorum.

Makrom

Function Renklere_Gore_Degerleri_Topla(bolge As Range, hangi_renk As Range) As Double
    Renklere_Gore_Degerleri_Topla = 0
    Dim Cell
    Color_Index = hangi_renk.Font.ColorIndex
    For Each Cell In bolge
        If (Cell.Font.ColorIndex = Color_Index) And IsNumeric(Cell.Value) Then
            Renklere_Gore_Degerleri_Topla = Renklere_Gore_Degerleri_Topla + Cell.Value
        End If
    Next Cell
End Function

Kullanmaya Çalıştığım Formül

=Renklere_Gore_Degerleri_Topla(Kasa Hesap!$C$5:$D$423;A5;">=01/01/2021";Kasa Hesap!$A$5:$A$423;"<=31/01/2021")

Yardımcı olabilirseniz sevinirim.