[[20020620203643]]　『カタカナからローマ字に変換できますか。』（おばー）　ページの最後に飛ぶ

『カタカナからローマ字に変換できますか。』（おばー）

名簿の作成で漢字で氏名を入力すると同時にフリガナが表示できる関数を大変便利に使っております。

さらにフリガナ(半角カタカナ)をローマ字に変換する方法はないでしょうか。

例：ヤマダ　タロウをYAMADA TAROUと表示する

勉強不足ですみませんが

漢字で氏名を入力すると同時にフリガナが表示できる関数・・・どんな関数でしょうか。

フリガナ(半角カタカナ)をローマ字に変換する関数は無いように思います。

 でも、カタカナに対してローマ字は決まっているわけですから、変換式を

カタカナの数（４?個）だけ準備しておけば、なんとかマクロ（VBA）で作れると思います。

 変換式をそろえるのが面倒くさいですね。

もしかして売り物になるかも。

  考え方、

 １）指定セルの文字数を調べる。

     セルの文字に対して

      文字数の数だけ、順に前から文字を取り込み、半角カタカナなら変換式で変換してつな       げていく。（半角カタカナかどうかの判別方法が今直ぐおもいつかない。）

 ２）末尾文字まできたら、出来たローマ字をその出るに記載する。

      変換は Select Case 文を使えばいいでしょうか。

  どなたか、作ってみませんんか。              （なお）

 ↓漢字で氏名を入力すると同時にフリガナが表示できる関数（kazu）

－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

  だれも作らないようなので、作ってみました。

 変換したいセルをアクティブ（セレクト）して実行するとローマ字に変換します。

 半角カタカナのみ変換します。その他はそのままです。

  但し、現在は変換表（？）はア、カ行の２行のみしか入れてありません。

 どなたか、下の表に同じように、サ、タ・・・・と入れてください。ご協力を！

 なお、現在、未完成の変換表文字は「？」で表示します。

 すべて、機械的に変換表（実際には select case 文）をいえれば完成？ です。

 なお、現在はアクティブセルだけですが、範囲を指定して、その範囲を全て変換する

ことも、多少の変更で可能と思います。

                                                         （なお）

 なお、このコード（変換ソフト）は一応、私の作品として扱わせてください。

 転載、変更時には 一報ください。

 （なお）さんへ、ここに書かれていた（なお）さんのコードは半角カタカナが

 含まれていて、Web上で表示するのは問題があったので私が一時的に保管しました。

 （kazu）

 （なお）さんの開発したカタカナからローマ字に変換するVBAを組み込んだブックを

 下のダウンロード・ページにアップロードしました。

 興味のある方はダウンロードして、お試しください。

 （kazu）

(kazu)さん不完全の作品ですがアップロードありがとうございました。

 一言蛇足ですが、紹介名が「なお」ではなく「ひろ」になっていましたが、洒落でしょうか。

                                                                  （なお）

 すみません、ポカミスです。今修正しました。謝々。

 あれっ、同じ人ではないのですか？

（kazu）

 同じ人ではないのですか？

 メール名は「ひろ」ですが、掲示板（この質問箱等）では「なお」を使わせてもらっています。（なお）

コメント返信：