Oct関数

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

解説
指定した値を８進で表した文字列を返します。
引数numが整数でない場合、最も近い整数に丸められます。

サンプル
次の例は、10進で表した数値を８進に変換した結果を表示します。最初のMsgBoxでは「22」が、次のMsgBoxでは「23」が表示されます。

Sub Sample()
    Dim a As Variant
    a = 18
    MsgBox Oct(a)
    a = 18.8
    MsgBox Oct(a)
End Sub