toplamada yardım

[damra2005]

ekli dosyada toplamada problemimi çözemedim. lütfen yardım edin

 

[Necdet]

Sayın damra2005,

ekli dosyadaki gibi olabilir mi?

 

[mehmett]

Sıra nosuna göre şu şekilde formülize edebiliriz;

=ETOPLA(A:A;1;C:C)

=ETOPLA(A:A;2;C:C)

=ETOPLA(A:A;3;C:C)

Formüllerdeki rakamlar şahısların sıra numaralarını gösterir.

 

[veyselemre]

[vb:1:1b5830c111]Sub topla()
For x = 2 To [b65536].End(3).Row
If Cells(x, 2) <> "Toplam" Then
toplam = toplam + Cells(x, 3)
Else
Cells(x, 3) = toplam
gtoplam = gtoplam + toplam
toplam = 0
End If
Next
If Cells(x - 1, 2) = "Genel Toplam" Then Cells(x - 1, 3) = gtoplam
End Sub[/vb:1:1b5830c111]

 

[mehmett]

Sıra nosuna göre şu şekilde formülize edebiliriz;

=ETOPLA(A:A;1;C:C)

=ETOPLA(A:A;2;C:C)

=ETOPLA(A:A;3;C:C)

Formüllerdeki rakamlar şahısların sıra numaralarını gösterir.

Genel Toplam için de formülümüz şöyle;

=ETOPLA(B:B;"toplam";C:C)