Aylara Göre Toplama

[Trilenium]

Excel Tablomda

XX YY XX YY
OCak Ocak Subat Subat ...........

Ben bir hücreye 1 Yazarsam XX lerin Sadece Ocak ayını toplamasını 2 yazarsam XX lere ait OCak+Subat ları toplamasını istiyorum.Bunu SUMIF ile yapmaya callıştım fakat olmadı...

Teşekkürler

*Not : Formülle yapmak istiyorum Vba ile yapmak istemiyorum

 

[Ali]

SUMPRODUCT(TOPLA.ÇARPIM) fonksiyonunu deneyiniz.

 

[Trilenium]

SUMPRODUCT(TOPLA.ÇARPIM) denedigimde VALUE hatası alıyorum..Formulu fazla tanımıyorum...

 

[Ali]

Örnek dosyanızı görmeden birşey diyemem.

 

[Trilenium]

Örnek DOsyamı yükleyemem ama şöyle başlıkları gösterebilirim

XX YY XX YY XX
JAN JAN FEB FEB MAR
10 20 40 35 50

Ben 1 yazarsam Ocagı 2 yazarsam ocak şubatı 3 yazarsam OCak şubat martı diye gidicek... ama hep XX leri istiyicem bu toplamda

 

[Merhum İdris SERDAR]

SUMPRODUCT - TOPLA.ÇARPIM fonksiyonu için:

http://www.excel.web.tr/f60/sumproduct-topla-carp-m-fonksiyonu-ve-uygulamalar-t16859.html

burada yer alan dosyayı inceleyin.

.

 

[Orion1]

Merhaba.
Sayın conrad sizin için bir KTF hazırladım.
Kullanışışı aşağıdaki gibidir.
Kodları kullanacğınız programda boş bir standart modül açarak yapıştırınız.
Formüllerde uzman arkadaşlar sanırım yerleşik fonksiyonlarla bir çözümde bulabilirler.

=aytopla($A3:$X3;"XX";Y$1)

Function aytopla(alan As Range, olcut As String, uzunluk As Byte)
Dim hcr As Range, say As Byte, tpl As Double
say = 1
For Each hcr In alan
    If say > uzunluk * 2 Then Exit For
    If Cells(1, hcr.Column).Value = olcut Then
        tpl = tpl + hcr.Value
    End If
    say = say + 1
Next hcr
aytopla = tpl
End Function

 

[Ali]

Buda fonksiyon ile ilgili örnek olsun.

 

[Trilenium]

Evren Eline koluna saglık cok teşekkür ederim.

Fakat benim bunu Formüle etmem gerekli..Bu bir rapor ve Modüle ekledigimde karşı tarafın Macro Güvenligi vsler ile ugraşmaması gerekli.Ama bu kod benim başka raporlarım içinde kullanışlı olacaktır.

Formüle edilerek yapabilecek arkadaş olursa cok sevinirim.

Teşekkürler

 

[Trilenium]

Ali hocam süpersin..Çok Çok teşekkür ederim..eline koluna saglık.. Sonradan gördüm örnegi...