VBAでの整数部分の切り捨てについて

ググっても少数以下の切り捨てしか出てこなかった。
本当に苦戦苦戦しました。

概要はいたってシンプル
1、切り捨てしたいケタ数で除算
2、int関数で小数部切り捨て
3、1で使用した桁数を乗算

たぶん具象例見たほうがわかりやすいので、
一回具象例かいときます
Int(「元となる値」 / 「切り捨てたい位」) * 「切り捨てたい位」

Int(333333 * 0.98 / 1000) * 1000

大阪で商売してましたら、サービスで
「100円以下切り捨て」っちゅうのが
ありますねんわｗｗｗ