Toplama yapmak?

[lapot]

Arkadaslar
Ekteki dosyadaki B ve C stutunundaki sayilari bir folmulle D deki hucrelere yazdrip nasil toplam alabiliriz?
Yardimlariniz icin cok tesekkurler.
Saygilar Sunuyorum

 

[Tarkan VURAL]

yukarıdaki formüller veriler aralıklarda toplama yapar.

 

[lapot]

Cok sagol arakadasim fakat bu sekilde macro calistirdimi "Procedure too large" mesaji cikiyor. Yani islem cok buyuk diyor ve hata veriyor.Cunku bu toplama islemi 600 satir dan daha fazla. baska bir yolu yok mu arkadasim???????????????

 

[lapot]

yardim edebilecek arkadas yok mu?
saygilar

 

[mehmett]

Sn lapot,

600 değil 60.000 satır da olsa Excel'de toplama işlemi Sn Tarkan Vural'ın verdiği formüllerle yapılır. Siz ne yapmak istiyorsunuz, biraz daha açık anlatır mısınız?

 

[lapot]

Sagol arkadsim.sonunda cozdum, yapmak istedigim seyi asagida sunuyorum.makroda sayfalarca formul yazacagima FillDown comutuyla kisaca yuzlerce satiri toplatabildim.

ornek olsun diye asagida veriyorum.
saygilar

Sub Macro1()

Range("B22").Select
Range("D2").Activate
ActiveCell.FormulaR1C1 = "=SUM(RC[-2]:RC[-1])"
Range("D211").Select
Selection.FillDown
Range("B1313").Select
Selection.FormulaR1C1 = "=SUM(R[-11]C:R[-1]C)"
End Sub