Satır ve Sütunları Dikkate Alarak ETOPLA

[baydeniro]

Merhaba arkadaşlar. Kayıtlar sütunlarındaki verileri sonuçlar sütununda olduğu gibi sütunları ve satırları dikkate alarak toplamak mümkün mü ?
Örnek dosya aşağıdaki linkte :

http://dosya.co/hg8xi0nlwwgs/SATIR_SÜTUN_ETOPLA.xlsm.html

 

[Korhan Ayhan]

L4 hücresine aşağıdaki formülü uygulayıp deneyiniz.

=TOPLA.ÇARPIM(ESAYIYSA(MBUL(L$2;$B$2:$I$2))*ESAYIYSA(MBUL($K4;$A$4:$A$12))*($B$4:$I$12))

 

[mersilen]

Alternatif olsun

Sub cc()
For Each hucre1 In Range("L4:O8"): deg = 0
    For Each hucre2 In Range("B4:I12")
     
        If InStr(Cells(hucre2.Row, "A"), Cells(hucre1.Row, "K")) > 0 And InStr(Cells(2, hucre2.Column), Cells(2, hucre1.Column)) > 0 Then deg = deg + hucre2.Value
    Next hucre2
    Cells(hucre1.Row, hucre1.Column) = deg
Next hucre1
End Sub

 

[baydeniro]

Sayın Korhan Ayhan çok teşekkür ederim, elleriniz dert görmesin.

 

[baydeniro]

Sayın mersilen çok çok teşekkür ederim. Harika bir kod oldu.

 

[blazer2004]

Merhaba hocalarım benimde bu konuyla ilgili aşağıdaki resimde görüldüğü gibi problemin var.=TOPLA(b54:b96) dediğim zaman #DEĞER! yazısı çıkıyor.Yardımcı olabilirmisiniz.

2,03
1,99
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
3,96
3,87
#DEĞER!
#DEĞER!
#DEĞER!
#DEĞER!
2,79
#DEĞER!
#DEĞER!
#DEĞER! =TOPLA(b54:b96) normalde toplaması gerekir ama bu #DEĞER! çıkıyor.

 

[mersilen]

Merhaba hocalarım benimde bu konuyla ilgili aşağıdaki resimde görüldüğü gibi problemin var.=TOPLA(b54:b96) dediğim zaman #DEĞER! yazısı çıkıyor.Yardımcı olabilirmisiniz.

Merhaba
Muhtemelen toplanacak alanda metin formatında değer vardır.
Konunuzu örnek dosya eşliğinde yeni başlıkta açarsanız daha kolay yardımcı olabiliriz.