実現したいこと
入力規則で以下の場合にエラーダイアログが表示されるように設定したい
・文字数が6文字以下
・指定の記号が入力されている
前提
C6セルに値を入力し、
条件にあてはまればエラーメッセージを表示する。
発生している問題
以下の数式では、文字数が0以外の時はすべてエラーダイアログが表示されてしまいます。
Excel
1=NOT(OR((LEN(C6)<6),COUNTIF(C6,"*:*"),COUNTIF(C6,"*\*"),COUNTIF(C6,"*¥*"),COUNTIF(C6,"*?*"),COUNTIF(C6,"*?*"),COUNTIF(C6,"*[*"),COUNTIF(C6,"*]*"),COUNTIF(C6,"*/*"),COUNTIF(C6,"*~**"),COUNTIF(C6,"***"))) 2
試したこと
・不等号記号を変更して確認してみましたが発生している問題は変わらず、、
・文字数指定の部分を省いた場合、指定文字列を入力時にエラーダイアログが表示されるので、文字数制限の数式以外は問題ないと思います。
・以下の数式にしたら文字数は6文字以上でないとダイアログ表示がされましたが、?などの文字が入っていてもダイアログが表示されなくなりました。
Excel
1=OR((LEN(C6)>=6),NOT(OR(COUNTIF(C6,"*:*"),COUNTIF(C6,"*\*"),COUNTIF(C6,"*¥*"),COUNTIF(C6,"*?*"),COUNTIF(C6,"*?*"),COUNTIF(C6,"*[*"),COUNTIF(C6,"*]*"),COUNTIF(C6,"*/*"),COUNTIF(C6,"*~**"),COUNTIF(C6,"***"))))
備考
理想はvbaで設定することでしたが、
以下をサイトを参考にAddメソッドで試したが上手くいかなかったので、
入力規則でやってみたものの詰まっている状態です。
https://jizilog.com/vba-validation

回答1件
あなたの回答
tips
プレビュー