解決済みのQ＆A

エクセル2003で半角カナ入力済みを一斉に全角カナに関数を使わず変換する方法を教...

エクセル2003で半角カナ入力済みを一斉に全角カナに関数を使わず変換する方法を教えてください。
よろしくお願いします！

質問日時：

2011/4/14 16:29:12
解決日時：

2011/4/14 17:10:39
閲覧数：

544

回答数：

3

ベストアンサーに選ばれた回答

onegaidesudesuさん

マクロ案です。
その範囲をまとめて選択して、下記のマクロを実行すると、、
半角文字を全角文字に一気に変換します。

Sub test()
Dim c As Range
For Each c In Selection
c.Value = StrConv(c.Value, vbWide)
Next c
End Sub

＜マクロの張り付け＞
１．上記のマクロコードをコピーして、、エクセルのシートに戻って、、
２．「Alt」キーを押したまま「F11」→「I」→「M」と順番にキーを押していきます。
３．広い窓のカーソルが「テカテカ」しているところにコードを貼り付けます。
４．もうこのVBEの画面は必要ないので、右上の「×」を押すと、元のシートに戻ります。

＜マクロの実行＞
※最初に範囲を選択してから…
１．データのシートから「Alt」キーを押したまま「F8」を押します。
２．マクロのダイアログで、マクロ名が「test」となっているのを確認して「実行」