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

解決

BECK 2004-10-04 19:35:30 No: 116742

こんにちは

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

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

nanashi 2004-10-04 20:25:56 No: 116743

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 20:38:35 No: 116744

nanashi様

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

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

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