Ardışık Çift Sayıların Toplamını Bulma

Ardışık Çift Sayıların Toplamını Bulma isimli içerikte, bu işlemin nasıl yapılacağı alternatif yöntemlerle öğretilmektedir.

Excel Tablosu Hazırlama​

Öncelikle basit bir tablo oluşturalım. Bu tabloda, hangi çift sayılardan başlayarak toplam almak istediğinizi ve kaç adet çift sayı toplamak istediğinizi belirtmek için hücreler olacaktır.

Excel Formülü ile Toplam Bulma​

Formül kullanarak ardışık çift sayıların toplamını bulmak için şu adımları takip edebiliriz:

1. Başlangıç hücresinde (örneğin A2 hücresinde) başlangıç çift sayısını yazın.
2. Kaç Adet Sayı hücresinde (örneğin B2 hücresinde) toplamak istediğiniz çift sayı adedini yazın.
3. Formül Sonucu hücresinde (örneğin C2 hücresinde) aşağıdaki formülü kullanın:

Bu formül, ilk sayının değerini almakta ve kaç adet sayı toplamak istediğinizi belirleyen bir döngü ile bu sayıları toplamaktadır.

VBA Kodu ile Toplam Bulma​

VBA kullanarak aynı işlemi gerçekleştirmek için aşağıdaki adımları izleyebilirsiniz:

1. Alt + F11 tuşlarına basarak Visual Basic for Applications (VBA) editörünü açın.
2. Ekle menüsünden Modül seçeneğini seçin.
3. Aşağıdaki VBA kodunu ekleyin:
   
   Kod:

   Function CiftSayiToplami(Baslangic As Integer, Adet As Integer) As Integer
   Dim Toplam As Integer
   Dim i As Integer
   Toplam = 0
   
   For i = 0 To Adet - 1  
        Toplam = Toplam + (Baslangic + i * 2)
   Next i
   
   CiftSayiToplami = Toplam
   End Function

4. VBA kodunu ekledikten sonra, Excel'e geri dönün ve VBA Sonucu sütununa (örneğin D2 hücresine) şu formülü yazın:
   
   Kod:

   =CiftSayiToplami(A2, B2)

Bu VBA fonksiyonu, verilen başlangıç sayısından itibaren belirttiğiniz sayıda ardışık çift sayıyı toplamakta ve sonucu döndürmektedir.

Sonuç​

Bu bilgiler ile ardışık çift sayıların toplamını hem formül hem de VBA kodları ile kolayca bulabilirsiniz. Formül yöntemi basit ve hızlı bir çözümdür, ancak VBA kullanarak daha esnek ve özelleştirilebilir bir çözüm oluşturabilirsiniz.

Yararlanmanız temennisiyle.