CCur関数

構文
CCur(expression)
引数expressionには、任意の数式または文字列式を指定します。

解説
CCur関数は、引数を評価して通貨型「-922,337,203,685,477.5808 ～ 922,337,203,685,477.5807」を返します。

サンプル
次の例は「123.456789」を代入した倍精度浮動小数点数型変数（Double）を２倍した結果と、その結果を通貨型に変換した結果を表示します。

Sub Sample()
    Dim a As Double     '倍精度浮動小数点数型
    a = 123.456789
    MsgBox a * 2        '246.913578を返します
    MsgBox CCur(a * 2)  '246.9136を返します
End Sub