ブラウザからコピーしてきた文字は、PHONETIC

質問

ブラウザからコピーしてきた文字は、PHONETIC関数を使ってふりがなを抽出するのは不可能でしょうか？

例えば、yahooのトップページ（http://www.yahoo.co.jp/）から
「サイトの登録」と言う部分をコピーして、エクセルのＡ１に貼り付けました。
そして、Ｂ１に=PHONETIC(A1)といれましたが、
ひらがなとカタカナの部分はふりがなを抽出できましたが「登録」の部分はそのままです。

試しに、手入力でＡ２セルに「登録」と投入して、オートフィルでＢ２に=PHONETIC(A2)を入れたら、
「トウロク」に変換されました。

と言う事は、サイト（ブラウザ）からコピペしてきた文字列は、PHONETIC関数を使って
ふりがなを抽出するのは不可能と言うことでしょうか？

ＶＢＡを使えば可能ですか？

回答No.1

keithin · ベストアンサー

手で打ち込んでEnterした言葉しか、振り仮名は持っていません。
振り仮名を持っていない言葉には、振り仮名を表示させることはできません。

ちなみに手打ちで「間違った読み」で日本語変換して打ち込んだ言葉だと、打ち込んだ通りの間違った振り仮名が付いてます。

＃参考
わざわざPHONETIC関数を使わなくても、振り仮名を表示すれば振り仮名の有り無しは一目で判ります。
Excel2007以降なら、ホームタブの「ア亜▼」ボタンから「ふりがなの表示/非表示」で。

＞ふりがなを抽出

比較的最近のウィンドウズを使っているなら、手動操作でも、無い振り仮名を新たに生成する事はできます。
Excel2007以降ならホームタブの「ア亜▼」ボタン、Excel2003以前なら書式メニューのふりがなから「振り仮名の編集」を行います。

必要に応じて、数式バーの中で言葉を選びながら「ふりがなの編集」をしてもＯＫです。
実際に手を動かして、できるか確認してみて下さい。

＞ＶＢＡを使えば

できます。

手順：
日本語を打ち込んであるセル範囲を選択する

sub macro1()
selection.setphonetic
end sub

を実行する

お礼

ありがとうございました。