VBAで数値を丸める

プログラミング

たまに実装しようとすると忘れるので備忘録的に。

'********************************************************
'関数ID ：RoundDown
'説明   ：数値を切り捨て丸める関数
'引数   ：roundNum ･･･ 丸める数値
'       ：digit    ･･･ 桁数(少数以下)
'戻り値 ：丸められた数値
'********************************************************
Function RoundDown(ByVal roundNum, ByVal digit)
    RoundDown = Fix(roundNum * (10 ^ digit)) / (10 ^ digit)
End Function

たまたま帰ってきてテレビつけたら、
「金スマ」が「さよなら・飯島愛さんスペシャル」やっててちょっと感動しちゃいました(ﾉω･､)
また小田和正のBGMがさらに涙腺を刺激してきてヤバかった(笑)