VBAメモ 整数部「10の位」「100の位」で設定された丸め位置

StrReverse
文字列の並びを逆さにする。

丸めの桁位置を指定するのに応用。

Round(値,★桁数)

1の位　→　-1
10の位　→ -2
100の位　→　-3

設定値 = "100"
桁数 = Instr(StrReverse(strVal),"1",1,vbBinaryCompare)*-1
※ベタ打ちだから、ミスってるかも。

１）StrReserveで「100」が「001」
２）Instrで「001」の「1」の文字位置を取得
（この場合、「3」が戻り値）
３）整数部なので「-1」を掛ける