EXCEL：引用先のふりがなの付け方？

質問

EXCELで入力した日本語データ（たとえば,A1に「花」）を他のセル（A2）で引用（＝A1)したとき，A2の「花」に「はな」とふりがなを付けることはできないのでしょうか?
何か良い方法がありましたらお教えください。
よろしくお願いします。

回答No.5

imogasi · ベストアンサー

＞,「鯖の味噌煮」のような一部ひらがなの場合もうまくいくのでしょうか
タイノミソニ
鯛の味噌煮
になりました。出来ると言うことでしょう。
＞漢字だけ振りガナ
ＶＢＡを使い
＝ＰＨＯＮＥＴＩＣ（Ａ１）で出す振りガナ「タイノミソニ」と
または
Sub test02()
Cells(1, "B") = WorksheetFunction.Phonetic(Cells(1, "A"))
End Sub
でだす「タイノミソニ」と
'-----
Sub test01()
Cells(1, "C") = StrConv(Cells(1, "A"), vbKatakana)
End Sub
で出来る
鯛ノ味噌煮
を比べ、
この場合「ノ」の一致個所を捉えて、「ノ」をスペースで置きかえれば（「タイ　ミソニ」と）出来そうな予想です。
タイ　ミソニ
鯛の味噌煮
しかし振りガナと漢字の位置合わせなどの難問もあり
全般に技巧的で、満足は難しいと言うことでしょう。

お礼

いろいろ、ありがとうございました。私の技量ではちょっと実用的ではなさそうです。ご指南、感謝いたします！また、お願いします。

回答No.4

imogasi

Ａ１セルに「花」と入っているとします。
Ｂ１セルに
（１）=PHONETIC(A1)&CHAR(10)&A1
と入れます。
（２）Ｂ１セルの書式－セル－配置－折りかえして全体を
表示するに「チェック」を入れてＯＫ
これで
ハナ
花
となります。
カナを小さくするには、Ｂ１をコピーして値をＢ１に張りつけして、式を消し、カナ部分を文字範囲指定して、フォントサイズを小さいものに指定する。

お礼

ありがとうございます。まだ試しておりませんが,
たとえば,「鯖の味噌煮」のような一部ひらがなの場合もうまくいくのでしょうか?

補足

試してみました。ありがとうございます！！

A1に「菜の花」のように、ひらがなが入るとphonetic関数では「なのはな」と全て表示されますが,元のとおり「菜：な」と「花：はな」だけにふりがなをつける方法はありませんでしょうか?（同じセル内で）

回答No.3

ki-aaa

A2に次の式を入れたら如何でしょう。

=PHONETIC(A1)&CHAR(10)&A1

それから、セルの書式設定・配置で、折り返して全体を表示するにチェックを入れる

お礼

ありがとうございます。その手がありましたね！

回答No.2

yko_

こんばんは。

ご希望の通りのシンプルな方法は分からないので
行の高さとフォントを上手く調整してこういった形では如何でしょう？
ふりがなを取り出す関数です。
A2にこちらを入力すると「ハナ」と表示されます。

**********************
　A　　　　入力式
1　花　　　
2　ハナ　　(=PHONETIC(A1))
3　花　　　(=A1)
**********************

お礼

ありがとうございます。できれば同じセル内に表示したいのですが・・・

回答No.1

matrix4

他のセルにふりがなをつけるには・・

A1　　B1

花　　=PHONETIC(A1)

で、B1にかなができます。

お礼

ありがとうございます。やはり，phonetic関数で他のセルにということなるのでしょうか?