重要なお知らせ

「教えて! goo」は2025年9月17日(水)をもちまして、サービスを終了いたします。詳細はこちら＞

【GOLF me！】初月無料お試し

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

解決済

  • 質問者：e-l
  • 質問日時：
  • 回答数：4件

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

通報する

この質問への回答は締め切られました。

質問の本文を隠す

A 回答 (4件)

No.1ベストアンサー

  • 回答者： todo36
  • 回答日時：

n - Fix(n)

    • good
    • 3
    • 件
通報する

No.4

  • 回答者： imogasi
  • 回答日時：

下記をやってください。

「ＦＩＸ」の方に分があるのでは。マイナスの数の場合に差が出る。
(例データ）Ａ１：Ａ５
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
    • good
    • 2
    • 件
通報する

No.3

  • 回答者： mfuku
  • 回答日時：

＃２の者です。



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

（誤）Dim a As String
（正）Dim a As Double
    • good
    • 1
    • 件
通報する

No.2

  • 回答者： mfuku
  • 回答日時：

こんな感じでOKです。



Dim a As String

a = 1.325
MsgBox a - Int(a)
    • good
    • 1
    • 件
通報する

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

Q質問する（無料）

このQ&Aを見た人はこんなQ&Aも見ています

関連するカテゴリからQ&Aを探す

ページトップページトップ

Q質問する（無料）

このQ&Aを見た人がよく見るQ&A

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

おすすめ情報