数字の切り上げをするには?

解決


BECK  2004-10-04 10:35:30  No: 116742  IP: [192.*.*.*]

こんにちは

数字の切り上げ方法ですが、以下のような切り上げを行う場合の
関数等ありますでしょうか?
数字を小数点第一位にて表示する際、少数点第二位以降の数字が
あれば少数点第一位に切り上げる処理を行います。
例)
 0.023 → 0.1
0.0025 → 0.1
100.00 → 100.0
100.01 → 100.1

初心者質問で大変お恥ずかしいのですが、どうぞ宜しくお願い致します。

編集 削除
nanashi  2004-10-04 11:25:56  No: 116743  IP: [192.*.*.*]

FormatとIntを使えば出来ます。
下記のソースではマイナス時には値を切り下げるようにしています。
(-0.023 → -0.1 になるようにしています)


sngData = 0.0025

If sngData < 0 Then
    sngData = Int(sngData * 10) / 10
Else
    sngData = -Int(-sngData * 10) / 10
End If

Debug.Print Format$(sngData, "0.0")

編集 削除
BECK  2004-10-04 11:38:35  No: 116744  IP: [192.*.*.*]

nanashi様

>下記のソースではマイナス時には値を切り下げるようにしています。
>(-0.023 → -0.1 になるようにしています)

さっそく試してみたところ、希望を満たす結果を
確認することができました。

サンプルまで作って頂きありがとうございました。
また、何かありましたら宜しくお願い致します。

編集 削除