Döngü İle Sayılar Yazdırma ve Döngü Sonunda Toplama

Merhaba arkadaslar, bu konumuzda döngü ile 10 sayı yazdırıp sonuna formulle bunların Döngü Sonunda Toplamını alacağız. Konumuzda öğretmek istediğimiz döngü yapmak değil Döngü Sonunda Toplam formülünü nasıl yazabileceğinizi anlatmaktır.

Bir anlık düşünebilirsiniz neden bir toplama işleminine ayrıca konu açılsınki diye fakat toplama işlemini hangi satırlarda ve sütünlarda yapacağımızı bilmiyorsak konumuzda değineceğimiz RC yöntemini öğrenmeniz gerekir.

Döngü Sonunda Toplam alabilmekle ilgili örnek kodumuzu paylasalım;

Sub Döngü_Sonunda_Topla()
    Dim i As Integer
    Dim aralik As Range
    Set aralik = ActiveCell
    For i = 1 To 10
        aralik(i).Value = 100
    Next i
    aralik(i).Value = "=SUM(R[-10]C:R[-1]C)"
End Sub

Yazar: mmustafaaslan

2004 yilindan itibaren ozel bir sirketin finans departmaninda calismaktadir. Kendini excel, visual basic kullaniminda gelistirmis olan yazarimiz; Meslegi geregi SAP konusunda ileri derecede bilgilidir.

Bir Cevap Yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir


7 + 9 =