Sayıları Yeni Bir Sayıyla Çarpma

Sayıları Yeni Bir Sayıyla Çarpma

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.

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

Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst