ExcelのVBAでカタカナをチェックしたい

質問

ExcelのVBAで、あるセルの値が半角カタカナであった場合エラーとしたいのですが、
セルの値が半角カタカナという条件式の構文がわかりません。
困っています。どなたかお助けくださいませ！

また、できることならば、半角カタカナ→全角カタカナに自動修正させたいのですが、
無理ならば上記のエラーチェックだけでもよいです。
もし、こちらもおわかりになる方いらっしゃいましたら教えてください。よろしくお願いいたします。

回答No.6

imogasi

＃４です。
#５を見てビックリ。私のことではないですか。＃４は＃３さんのご回答を見て言ったものでは決してありません。ましてエラーがあるとか言っておりませんので悪しからず。
先日の他の質問Ｎｏ。６０９１６５の自分の回答のことが頭にあリ、また昔から半角の濁点半濁点のお陰でコードが長くなるのがいやでした。「破綻する」と言ったのは、濁点半濁点については、（濁点半濁点付きでない文字は、コードの計算だけだとすっきりして好みなんですが、それとは別の、）まったく別のロジックを持ち出さないと、対処できないと思い、そう述べたもので、私個人が２元化するのが好きでなかっただけです。
併せてご質問者には、本件結果として余分な書入れをすることになり済みません。