Aralıklı toplama

[elektrik67]

arkadaşlar merhaba basit olduğunu dusunduğum bir problemim var ancak cozemedim yardımlarınızı bekliyorum

elimdeki listedeki değerleri 4 er 4 er toplayıp baska bir sutuna atmak ıstıyorum.

çalışma örneğini ekledim, bugun yetiştirmem gerekiyor yardımlarınızı bekliyorum

 

[hamitcan]

Dosyanızı eklerseniz daha çabuk yanıt bulabilirsiniz.

 

[elektrik67]

yardım yardım

 

[Korhan Ayhan]

Merhaba,

Aşağıdaki formülü uygulayınız.

G3 hücresine;

=TOPLA(KAYDIR(C$2;SATIR(G1)*4-4;;4;))

 

[mersilen]

Alternatif olsun
Makro ile yapmak isterseniz.Sayfa1 in kod bölümüne yapıştırıp çalıştırın.

Sub tobla()
Set s1 = Worksheets("Sayfa1")
Set s2 = Worksheets("Sayfa2")
sonsat1 = s1.Cells(65536, "b").End(xlUp).Row
sonsat2 = s2.Cells(65536, "A").End(xlUp).Row


For i = 2 To sonsat1 Step 4
   a = Cells(i, "c") + Cells(i + 1, "c") + Cells(i + 2, "c") + Cells(i + 3, "c")
   say = say + 1
   s2.Cells(sonsat2 + 1, "a") = say & ".grup"
   s2.Cells(sonsat2 + 1, "b") = a
    
 
 sonsat2 = s2.Cells(65536, "A").End(xlUp).Row
Next i
End Sub

 

[elektrik67]

Korhan Bey ilginiz için çok teşekkür ederim.
Yalnız formülü dediğiniz gibi yazıyorum ancak hata veriyor .excel sayfasında gösterebilirseniz memnun olurum

 

[Korhan Ayhan]

Ne gibi bir hata veriyor!

 

[elektrik67]

formülü dediğiniz gibi kopyalayıp g3 e yapıstırıyorum ama tamam dediğimde formulde hata var cıkıyor

 

[Korhan Ayhan]

Tekrar denedim. Ben bir hata ile karşılaşmadım. Tekrar dikkatlice deneyiniz.

 

[elektrik67]

kusura bakmayın ama ben gene aynı hata ile karşılaştım

 

[Korhan Ayhan]

Eki inceleyiniz.

 

[elektrik67]

çok sağolun zahmet verdim

sanıyorum kopyaladığınız formuldeki ; ler yolladığınız ornekte , olarak girilmiş problem ondan kaynaklandı

 

[Korhan Ayhan]

Sorun sizin profil bilginizi gerektiği gibi yazmamanızdan kaynaklanıyor. İngilizce sistemde ";" yerine "," kullanılır. Ben bu ayırımı siz belirtmediğiniz sürece bilemem.

Lütfen profilinizdeki bilgileri düzenleyiniz.