Vba'da mutlak değerler nasıl hesaplanır (örnekle)

Bir sayının mutlak değeri o sayı ile sıfır arasındaki mesafeyi temsil eder.

VBA’da mutlak değerleri hesaplamak için Abs işlevini kullanabilirsiniz.

Bu işlevi pratikte kullanmanın yaygın bir yolu aşağıda verilmiştir:

 Sub FindAbsoluteValue()

    Dim i As Integer
    
    For i = 2 To 10
        Range(" B " & i) = Abs(Range(" A " & i))
    Next i
      
End Sub

Bu özel örnek, A2:A10 aralığındaki her hücrenin mutlak değerini hesaplar ve bunları B2:B10 aralığında görüntüler.

Aşağıdaki örnek, pratikte VBA’da mutlak değerlerin nasıl hesaplanacağını göstermektedir.

Örnek: VBA’da mutlak değerler nasıl hesaplanır

Excel’de aşağıdaki değerler listesine sahip olduğumuzu varsayalım:

A sütunundaki her hücrenin mutlak değerini hesaplamak ve bunları B sütununda görüntülemek istediğimizi varsayalım.

Bunun için aşağıdaki makroyu oluşturabiliriz:

 Sub FindAbsoluteValue()

    Dim i As Integer
    
    For i = 2 To 10
        Range(" B " & i) = Abs(Range(" A " & i))
    Next i
      
End Sub

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

B sütunu artık A sütunundaki her değerin mutlak değerini görüntülüyor.

A sütunundaki pozitif değerlerin her birinin B sütununda pozitif kaldığını unutmayın.

Ayrıca A sütunundaki negatif değerlerin her birinin B sütunundaki pozitif değerlere dönüştürüldüğünü unutmayın.

Not : VBA Abs işlevine ilişkin tüm belgeleri burada bulabilirsiniz.

Ek kaynaklar

Aşağıdaki eğitimlerde VBA’da diğer ortak görevlerin nasıl gerçekleştirileceği açıklanmaktadır:

VBA: Aralığın ortalama değeri nasıl hesaplanır
VBA: Bir aralıktaki değerler nasıl eklenir?
VBA: Aralıktaki satır sayısı nasıl sayılır?