Sayılara Yeni Bir Sayı Ekleme isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.
Faydalanılması temennisiyle
Hazır Kod
VBA:
Sub addNumber()
Dim rng As Range
Dim i As Integer
i = InputBox("Bir sayı yazın", "Değer gerekli")
For Each rng In Selection
If WorksheetFunction.IsNumber(rng) Then
rng.Value = rng + i
Else
End If
Next rng
End Sub
Açıklama
Bir aralıktaki sayılarınıza, tek seferde bir sayıyı ilave etmek ihtiyacınız olursa, üstteki kod bu ihtiyacın üstesinden kolayca gelecektir.Faydalanılması temennisiyle