Aktif Hücrenin Değerini Verilen Sayı Kadar Artır - Microsoft Excel

Sayı içeriği olan aktif hücrenin değerini belirlenen sayı kadar artıran ve sonucu yine aktif hücreye yazdıran makro kodudur.

Option Explicit

Sub AktifHucreninDegeriniArtir()
    Dim artisMiktari As Long
    
    artisMiktari = 1
    ActiveCell = ActiveCell + artisMiktari
End Sub