Karın Tanımı
Bir sayının mutlak değerini döndürür.
Basit Abs Örnekleri
| 123 | Alt Abs_Örnek()MsgBox Abs(-12.5)Alt Bitiş |
Bu kod 12.5 döndürür
Mutlak Sözdizimi
VBA Düzenleyicide, Abs İşlevinin sözdizimini görmek için “Abs(” yazabilirsiniz:
Abs işlevi bir argüman içerir:
Sayı: Sayısal bir değer.
Excel VBA Abs İşlevi Örnekleri
tarih içeren bir hücreye başvurabilirsiniz:
| 1234567 | Alt Abs_Örnek1()Aralık olarak hücreyi karartAralıktaki Her Hücre İçin("A2:A4")cell.Offset(0, 1) = Abs(hücre.Değer)Sonraki hücreAlt Bitiş |
Sonuç aşağıdaki gibi olacaktır.(lütfen bakınız B2:B4)
Aşağıdaki 2 örneğin her ikisi de 12 değerini döndürür.
| 1 | MsgBox Abs(-12) |
| 1 | MsgBox Abs(12) |
Bir sayı dizisi (1.5, 3.1, 2.1, 2.2, 1.8) verildiğinde 2'ye en yakın sayıyı bulmak için aşağıdaki kodu kullanabilirsiniz.
| 1234567891011121314151617181920 | Alt Abs_Örnek2()Soluk SayılarÖğeyi karartEn yakın Değeri Çift Olarak DimDim diff Çift olarakDim minDiff As DoubleminDif = 100Sayılar = Dizi(1.5, 3.1, 2.1, 2.2, 1.8)Rakamlarla Her Öğe İçinfark = Mutlak(öğe - 2)Eğer diff < minDiff iseminDiff = farken yakınDeğer = öğeBitirSıradaki eşyaMsgBox "En yakın değer: " & en yakınDeğerAlt Bitiş |
Sonuç aşağıdaki gibi 2.1 olacaktır.
