VBA（Visual Basic for Applications）の組み込み関数の一つである Abs 関数は、数値の絶対値を返すために使用される非常に基本的で汎用的な関数です。
■ 1. Abs関数とは？
Abs は “Absolute（絶対）” の略であり、与えられた数値から符号（プラスやマイナス）を取り除き、その数値の大きさだけを返す関数です。絶対値とは、数直線上での原点からの距離と考えることもでき、マイナス記号を無視して値を扱いたいときに便利です。
■ 2. 構文
Abs(number)
パラメータ
number：必須。絶対値を求めたい数値、または数値を返す式です。Integer,Long,Single,Double,Currency,Decimalなどの数値型に対応。
戻り値
numberが負の場合はその正の値を返します。numberが正の場合はそのまま返します。numberが 0 の場合は 0 を返します。
■ 3. 使用例
例1：単純な数値の絶対値を取得
Dim x As Double
x = Abs(-10.5)
MsgBox x ' 結果は 10.5
例2：正の数に対しても使用可能
Dim y As Integer
y = Abs(15)
MsgBox y ' 結果は 15
例3：変数を使った例
Dim a As Double
Dim b As Double
a = -123.45
b = Abs(a)
MsgBox "絶対値は " & b ' 結果は 123.45
■ 4. 使用場面と応用例
● 金額の計算におけるマイナスの除去
売上や費用などの集計時に、マイナス値を無視した純粋な金額の合計を取りたい場合に使います。
Dim 金額 As Double
金額 = -5000
MsgBox "処理金額: " & Abs(金額) & "円"
● 数学的計算・距離の算出
座標間の距離の計算などにも応用できます。
Dim x1 As Integer, x2 As Integer
x1 = 10
x2 = 4
MsgBox "距離: " & Abs(x1 - x2) ' 結果は 6
● 差異の分析
2つの値の差の絶対値を取ることで、増減の方向性に関係なく変化量を比較できます。
Dim 売上_前年 As Long
Dim 売上_今年 As Long
Dim 差 As Long
売上_前年 = 1200000
売上_今年 = 1000000
差 = Abs(売上_今年 - 売上_前年)
MsgBox "売上の差: " & 差 ' 結果は 200000
■ 5. 注意点
● Null や文字列が引数の場合
Abs 関数は数値型にしか使用できません。文字列や Null を渡すとエラーになります。
Dim str As String
str = "-5"
' MsgBox Abs(str) ' 実行時エラーが発生
この場合は、事前に Val() や CInt() などで数値変換が必要です。
MsgBox Abs(Val(str)) ' 結果は 5
● オーバーフローに注意
非常に大きな負の値（特に Integer 型などの範囲外の値）に対して Abs を使うとオーバーフローが起きることがあります。特に Integer.MinValue（-32768）の絶対値は +32768 ですが、Integer の上限は +32767 のためエラーになります。
■ 6. 他の関数との比較
| 関数名 | 説明 |
|---|---|
Abs | 絶対値を返す。符号を除去する。 |
Sgn | 数値の符号を判定（1：正、0：0、-1：負） |
Int / Fix | 小数点以下を切り捨てた整数値を返すが、負の数では異なる動作をする。 |
Round | 数値を四捨五入して返す。 |
Val | 文字列を数値に変換する。 |
■ 7. Abs関数を含む具体的なサンプル
● 顧客のクレーム金額処理
たとえば、ある企業が顧客の返金請求やクレーム処理額を一覧で管理しているとします。その中で負の値を返金額、正の値を加算請求と定義した場合、全体の影響を客観的に捉えるには、絶対値で集計することが有効です。
Dim 請求額(1 To 5) As Double
Dim 合計 As Double
Dim i As Integer
請求額(1) = -1000
請求額(2) = 2000
請求額(3) = -1500
請求額(4) = 3000
請求額(5) = -500
For i = 1 To 5
合計 = 合計 + Abs(請求額(i))
Next i
MsgBox "処理された総額: " & 合計
■ 8. まとめ
Abs 関数はVBAにおいて非常に単純ながらも、あらゆる場面で役立つ基本的な数学関数です。数値の符号を無視してその大きさだけを取り扱いたいとき、統計処理、差異の分析、会計処理など多岐に渡る分野で活用できます。特に、ユーザーが入力する数値の正負が不確定な場合に、ロジックの簡素化を図るうえで強力な味方になります。
Abs 関数自体は単純な関数ですが、その適用次第で業務ロジックの信頼性やコードの可読性に大きな影響を与えることができるため、基本に忠実な使い方を心掛けつつ、適切な場面で有効に活用しましょう。
