VBA：小数点以下の数字を取得できる関数は？

VBAで、小数点以下の数字を取得できる関数または、それに必要な関数を教えていただけたらと思います。たとえば、
1.325…から0.325　
3.256224から0.256224
5.23549から0.23549を取得。
といった感じです。（取得する値はdouleで桁数は不定です。）よろしくお願いいたします。

No.1 ベストアンサー 回答者： todo36 回答日時： 2004/06/22 18:09

n - Fix(n)

No.4 回答者： imogasi 回答日時： 2004/06/22 21:32

下記をやってください。

「ＦＩＸ」の方に分があるのでは。マイナスの数の場合に差が出る。
(例データ）Ａ１：Ａ５
1.23456
2.34
-3.456
-32.12
-0.00012
（コード）
Sub test05()
For i = 1 To 5
Cells(i, "B") = Cells(i, "A") - Fix(Cells(i, "A"))
Cells(i, "C") = Cells(i, "A") - Int(Cells(i, "A"))
Next i
End Sub
（結果）
1.234560.2345600000 0.23456
2.340.340.34
-3.456-0.4560.544
-32.12-0.120.88
-0.00012-0.000120.99988

No.3 回答者： mfuku 回答日時： 2004/06/22 18:36

＃２の者です。

見ればわかるとは思いますが、先ほどの回答、訂正します。

（誤）Dim a As String
（正）Dim a As Double

No.2 回答者： mfuku 回答日時： 2004/06/22 18:11

こんな感じでOKです。

Dim a As String

a = 1.325
MsgBox a - Int(a)