Excel2003 すでに入力されている全角文字

質問

お世話になります。

掲題の件で 質問が御座います。

通常「全角文字」→「半角文字」に変換する際には「=ASC」を使いますが
この関数を使わずに どこかのキー1発で
「すでに入力されている全角文字を半角文字」に変換出来ないでしょうか？
（漢字、ひらがな以外のカタカナ、アルファベットをです）
入力途中の場合は「F8」だということは知っていますが
すでに入力されている文字に対しては無効の手段ですよね。。

通常は そのような機能は無く、やはりVBAの出番となるのでしょうか？

どなたかお分かりになる方、ご教示ください。

宜しくお願い致します。

回答No.3

xls88 · ベストアンサー

＞「個人用マクロブック＆ショートカットに登録」
＞で いつでも好きな時に好きな場所で活用出来ますよね？
提示したコードは、アクティブセルが対象になっています。
複数のセルを処理するのは、For文でLoopするコードを組めば良いと思います。

[XL] Visual Basic for Applications でのループ構造の使用方法
http://support.microsoft.com/kb/141762/ja

お礼

はい！

ありがとう御座います！！

回答No.2

xls88

ActiveCell.Value = StrConv(ActiveCell.Value, vbNarrow)
上記のようなコードで半角にできると思います
あとは、対象セル範囲をFor文でLoopすれば良いと思います。

お礼

ご回答 誠にありがとう御座います！！

こんな1行でＯＫなんですね！！

「個人用マクロブック＆ショートカットに登録」
で いつでも好きな時に好きな場所で活用出来ますよね？

ありがとう御座いました。

回答No.1

noname#99913

エクセルの機能では、そのようなものはなかったように思います。

VBAでやることになりますが、VBAを作っているひまに、ASC関数をコピーしてやったほうが早いでしょう。

お礼

ご対応ありがとう御座います。

一応 個人用マクロブックとショートカットに登録するつもりで
いるので関数入れる方が時間が掛かる予定となっております。

ありがとうございました。