Sayıları Yeni Bir Sayıyla Çarpma 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ızı, tek seferde bir sayıyla çarpma ihtiyacınız olursa, üstteki kod bu ihtiyacın üstesinden kolayca gelecektir.Faydalanılması temennisiyle
Ekli dosyalar