Fix関数

構文
Fix(num)
引数numには、倍精度浮動小数点数型の数値または任意の数式を指定します。

解説
引数numの小数部分を取り除いた整数を返します。
Fix関数の返り値は、引数numと同じデータ型になります。
引数numに負の数値を指定した場合、Fix関数は引数num以上の最小の整数を返します。

サンプル
次の例は、Fix関数で数値を整数に丸めます。また、Fix関数の返り値のデータ型を調べます。

Sub Sample()
    Dim a As Double, b As Double, c As Variant
    a = 1234.5678
    b = -1234.5678
    MsgBox Fix(a)       '1234が返ります
    MsgBox Fix(b)       '-1234が返ります
    c = Fix(b)
    MsgBox VarType(c)   '５(Double)が返ります
End Sub