EXCEL VBAの入力規則で小数点桁数を指定することはできますか？

EXCEL VBAで質問がございます。

下記のようにA1のセルに-100～+100までの入力規則をすることはできました。
With Range("A1").Validation
.Delete '入力規則の削除
.Add Type:=xlValidateDecimal, Formula1:="-100", Formula2:="100" '入力範囲-100～+100
End With
これに小数点桁数を指定したいのですが、できますでしょうか？

例えば、小数点桁数を2と設定し、
99.11は、入力できるがが、99.111は、入力できなくしたいのです。
そのようなことは可能でしょうか？
よろしくお願いいたします。

No.1 ベストアンサー 回答者： fujillin 回答日時： 2022/01/07 13:15

こんにちは

通常の入力規則で、ユーザ設定のチェックを入れるのと同等のことを行えば宜しいかと。
少数2桁までの部分のチェックを式にした一例としては、
　=MOD(A1*100,1)=0
のような感じになると思います。
（範囲チェックも行うなら、条件式を複合させれば良いです）

上記は、値でチェックしているので、「99.1100」等は通ります。
文字列の桁数でチェックするのなら、「.」以降の文字数でチェックする方法も考えられるでしょう。
こちらであれば、「99.110」もはじくことが可能になると思います。

この回答へのお礼

ご回答ありがとうございます。
具体的にどのように記述したら良いか教えていただけないでしょうか？
よろしくお願いいたします。

お礼日時：2022/01/08 09:55