ＶＢＡ小数点

質問

ＶＢＡ小数点

小数点以下を削除したいのですがどうしたらいいのでしょうか？

例えば

１２３．４５だったら　１２３

１２３．８９でも　　　１２３

回答No.2

myRange · ベストアンサー

Int,Fix,RoundDownなどいくつか方法があります。

'---------------------------------
Sub test2()
　　Dim myVal, d1, d2, d3
　　myVal = 123.45

　　d1 = Int(myVal)
　　d2 = Fix(myVal)
　　d3 = WorksheetFunction.RoundDown(myVal, 0)

　　MsgBox d1 & " " & d2 & " " & d3

End Sub
'----------------------------------

以上です。

回答No.1

YUI_AI

Long、Integerなどの整数型の変数に代入すれば良いのでは。