全角→半角変換

「これやってください。」とデータファイルが添付されたメールがきた。
添付ファイルを開いてさてやろうか、としてはたと気がついた。全角だ。全角ではソフトが受け付けない。半角にしなくては。どうしようかと思ったがええい、めんどうだ。力仕事でやってしまえ。
エディタで開いて文字列の置換で "Ａ"→"A"で一括返還、"０"→"0" … で全角がすべてなくなるまで変換した。たいした量ではないので半角で入力し直していいわけだがそれはしたくない。なぜか。人間はどんなに注意しても間違える。単純で絶対間違えたくないことはコンピュータが得意な領分だもの。もっとも"Ａ"→"B"にしてしまう間違いを犯す可能性はある。
めったにあるわけではないからこれでよし。と思ったが今日またきた。
何か簡単に変換する手はないか。
考えたり検索して２つ見つけた。フリーソフトをダウンロードする手はあるがそれはしたくない。なんとなく。

見つけた方法

その１． EXCEL でファイルを開く。たとえはデータがＡ列だったとしたら隣のＢ列の一番上にカーソルを置く。
"関数の挿入"(f(x)というアイコン)で関数の分類を"文字列操作"にして"ASC"を選んで"OK"とする。次の画面で文字列に変換したいＡ列を選ぶ。"OK"とするとこれで変換される。残りのデータはセルの右の十字を下にひっぱってセルをコピーする。言葉で説明するのは難しい。この説明でわかるかな。
これでできちゃうんだ。あまりにも簡単で拍子抜けしてしまった。

その２． その１は簡単だけどそれでもまだめんどうだ。もっと楽できる方法はと考えていて思いついた。
エディタは「ＭＩＦＥＳ」を使っている。これはマクロが使える。マクロで何とかならないかと考えて出来た。下のような内容のファイルを作る。全部載せないけど大文字２３文字分、小文字２３文字分、数字１０個分作る。
できたらメニュ"マクロ"の中の"１コマンド分のコンパイル"をクリック。"カレントマクロのライブラリ格納"でマクロが登録される。
実行するには"指定マクロの実行"から"ZENHAN"をクリックで全ファイル内の全角が半角に変換される。これはクリック２回でできちゃうから楽々です。これからはいくらきてもだいじょうぶ。だけどこうやって準備して待っていると当分こないんじゃないかな。


*ZENHAN 英数字 全角から半角へ変換
replace(1,0,"Ａ",1,MAX_NUMBER,"A")
replace(1,0,"Ｂ",1,MAX_NUMBER,"B")
replace(1,0,"Ｃ",1,MAX_NUMBER,"C")
replace(1,0,"Ｄ",1,MAX_NUMBER,"D")
replace(1,0,"Ｅ",1,MAX_NUMBER,"E")

           ：
           ：