関数・メソッド

数値の絶対値を返す【Abs関数】【ExcelVBA】

構文

Abs(Number)  

Number・・・ 絶対値を取得したい数値 任意の有効な数式
戻り値 ・・・・・絶対値※数値の絶対値は、その数値から符号を取り除いた値
Numberに指定した数値の絶対値を返却します。
例)ABS(-1) と ABS(1) は両方とも 1 を返します。

Abs関数のサンプルコード

Public Sub sample()

    '■整数の場合
    Debug.Print Abs(1)  '1
    Debug.Print Abs(-1) '1
    
    '■小数点ありの場合
    Debug.Print Abs(5.5)    '5
    Debug.Print Abs(-5.5)   '5
    
    '■変数の場合
    Dim x As Long
    Debug.Print Abs(x)  '0  '初期化されていなければ0を返す
    x = -5
    Debug.Print Abs(x)  '5
    
    '■イレギュラーケース
    Debug.Print Abs("-7")   '7
    Debug.Print Abs("7")   '7
    
    '■実行時エラー13 型が一致しません
    Debug.Print Abs("")
    Debug.Print Abs("aaaaa")
    
End Sub

注意点

  •  引数に Null が含まれる場合、Null が返されます

関連記事

コメント

タイトルとURLをコピーしました