名前に関する関数

質問

ご存知の方、教えて下さい！

エクセルでA列に名前が入っていたとします。

山田花子
田中太郎

その名前を、関数をつかって

Y
T

と、イニシャルに変更する事は可能でしょうか？

エクセルド素人なので分からず・・・＾＾；
申し訳ございませんが、ご存知の方教えて頂ければ幸いです。
よろしくお願い致します。

回答No.3

noname#52504 · ベストアンサー

対応表を作ってVLOOKUPで探すのが標準的な解法だと思いますが、
ご参考までに、VLOOKUPを使わない別案を。

●訓令式（ex.陣内⇒Z／地井⇒T)

　=MID("A-I-U-E-OKGKGKGKGKGSZSZSZSZSZTDTD-TDTDTDNNNNNHBPHBPHBPHBPHBPMMMMM-Y-Y-YRRRRR-W",MOD(CODE(JIS(PHONETIC(【対象セル】)))-9249,2^8),1)

●ヘボン式（ex.陣内⇒J／地井⇒C）

　=MID("A-I-U-E-OKGKGKGKGKGSZSJSZSZSZTDCD-TDTDTDNNNNNHBPHBPFBPHBPHBPMMMMM-Y-Y-YRRRRR-W",MOD(CODE(JIS(PHONETIC(【対象セル】)))-9249,2^8),1)

Excel2003で動作確認済。

※既出の回答と同じく［ふりがな］が適切に設定されていることが前提になります。
※［ふりがな］の設定が全角カナ・全角カナ・半角カナいずれの場合も対応します。
----------------------------------------------------------------------
なお、対象のセルに［ふりがな］情報が無い場合には、PHONETICは使えません。
VBAで対応することになります。。

■エクセル　コピーしたセルにふりがなを表示させる方法
http://oshiete1.goo.ne.jp/qa3749952.html
■エクセルのふりがな関数について
http://oshiete1.goo.ne.jp/qa1550074.html

以上ご参考まで。

お礼

ありがとうございます！
とっても丁寧に教えて頂きありがとうございます＾＾

回答No.2

mu2011

無理やりですが、以下の方法が考えられます。
名前がエクセルで入力している（他からコピーした場合は不可能）事が前提です。
（１）カナ文字：英文字の２列変換表を作成
（２）イニシャルは=VLOOKUP(LEFT(PHONETIC(名前セル),1),変換表,2,FALSE)で変換する

回答No.1

suz83238

ふりがなを出す関数（PHONETIC）はあるんですけど、イニシャルは出ません。
そこで、
別シートに
あ　Ａ
い　Ｉ
う　Ｕ
以下略
という表を作っておいて、
=VLOOKUP(LEFT(PHONETIC(A1),1),Sheet2!A1:B48,2,0)

としてみるしかないと思います。

お礼

ありがとうございます！
やっぱり無理なんですね・・・
でも解決法をご提案頂きありがとうございます。