【VBA入力規則】ドロップダウンリストの値を直接入力するとエラーになる

Question

お世話になります。
VBAでドロップダウンリストを設定しました。
リストにある値であれば、直接入力も可能にしたいのですが、
現状直接入力するとエラーがでてしまいます。

Private Function validRules_AccountingCd(row As Integer)

With Sheets(INV_INFO_SHEET).Range("E" & row & ":E" & row + 5).Validation
       .Delete
       .Add Type:=xlValidateList, Formula1:="=" & HIDDEN_MAS_SHEET & "!$C$2:$C$" & endDataRow
       .ErrorTitle = "入力エラー"
       .ErrorMessage = "ドロップダウンリストから選択してください。"
End With

End Function

数式に設定しているデータ範囲(HIDDEN_MAS_SHEET & "!$C$2:$C$" & endDataRow
)は文字列型に設定しており、その中に数字4桁が記載されています。

別のアルファベットの羅列による文字列のドロップダウンリストでも同じように入力規則を設定していますが、
リストの値であれば直接入力しても特にエラーが出ることはありません。

数字4桁というのが問題なのでしょうか？

Answer 1

リストデータの数値に「'」をつけたら、直接入力がうまくいくようになりました。
書式とデータと2つの型を考慮する必要があることを知って大変参考になりました。

Answer 2

文字列での直接入力が必要なので頭に「'」を付けて入力してみてはいかがでしょう。

Comments

[pararinrinrin]

ご回答ありがとうございます。
「'」を付けて直接入力してみましたが、やはりエラーになってしまいます。
おそらく数値と文字列の型による不具合になるかとは思うのですが…

[radames1000]

こちらの環境ではうまくいくのでよくわかりませんね。
そうなると具体的な表などを見せていただかないと回答は難しいと思います。

[pararinrinrin]

ご回答ありがとうございます！
リストの数値に「'」をつけたら、直接入力がうまくいきました！
数値は文字列の頭に「'」をつけることによってデータ自体を文字列にするということを知ることができ、
大変参考になりました。ありがとうございました。

Answer 3

同じ４桁の数字でも、文字型の４桁の数字と、数値型の４桁の数字は異なるものとExcelが判断するからではないでしょうか。
したがいまして、E列の入力セルの書式を文字列にしてはいかがでしょうか。

Comments

[pararinrinrin]

ご回答ありがとうございます。
E列の入力セルの書式も文字列に設定しております。
逆にセルの書式を入力セル、リストセルどちらも数値に変えると改善するのでしょうか…

[kitasue]

入力セルのE列の書式がそもそも文字列になっていて、入力してエラーになるのであれば、HIDDEN_MAS_SHEETのC列の「書式だけ」が「文字列」になっていて、中身は数値なのでしょう。C列に入力されている数字４桁の右端にカーソルを置き、Enterキーを押してみてください。
あるいは、数字４桁の右にスペースが入っているとか。

[pararinrinrin]

ご回答ありがとうございます！
リストの数値に「'」をつけたら、直接入力がうまくいきました！
書式と中身のデータで型を分けて考える必要があるのですね。
大変参考になりました。ありがとうございました。