【Excel】エクセルにコピペした漢字のフリガナを表示するマル秘ワザ

「setphonetic」メソッドを利用する

　フリガナの情報が記録されていないデータからフリガナを取り出すには、VBAの「setphonetic」メソッドを利用します。といっても、コードの記述やマクロの記録は必要ありません。Visual Basic Editor（VBE）の画面から「イミディエイトウィンドウ」を表示して「selection.setphonetic」と入力するだけです。

　VBEはコードを記述するための画面。お使いのExcelに標準で用意されている機能です。［Alt］＋［F11］キーを押すか、［開発］タブから呼び出します。［開発］タブの表示方法は、以前の記事を参考にしてください。

フリガナが表示されないセル範囲を選択（⑩）しておきます。［開発］タブ（⑪）にある［Visual Basic］（⑫）をクリックします。［Alt］＋［F11］キーを押しても構いません

Visual Basic Editor（VBE）か別ウィンドウで表示されます。［表示］（⑬）－［イミディエイトウィンドウ］（⑭）の順にクリックします

イミディエイトウィンドウ（⑮）が表示されました。「selection.setphonetic」（⑯）と入力して［Enter］キーを押します。

タイトルバーに「（実行中）」と表示（⑰）されます。この表示が消えたら［表示 Microsoft Excel］ボタン（⑱）をクリックして、Excelのウィンドウに切り替えます。VBEの画面は閉じてしまって構いません

PHONETIC関数の結果がフリガナに変わりました（⑲）

　フリガナを一気に取得できました。ただし、「selection.setphonetic」で取得できるのは一般的な漢字の読みです。必ずしも正確なフリガナが自動的に振られるわけではないことに注意してください。

フリガナを修正する

　フリガナが間違っている場合は手動で修正するしかありません。ここでは「海野」さんの読みを「ウンノ」→「ウミノ」に修正してみます。フリガナは［ふりがなの表示/非表示］ボタンの右側［▼］をクリックして［ふりがなの編集］から修正可能ですが、ショートカットキーの［Shift］＋［Alt］＋［↑］キーも覚えておくと便利です。

［ふりがなの表示/非表示］ボタンの右側［▼］（⑳）をクリックして［ふりがなの編集］（㉑）からフリガナを修正できますが、［Shift］＋［Alt］＋［↑］キーも便利です

　ここでの例のようにPHONETIC関数を使っているなら、結果のセルでフリガナを確認してショートカットキーで修正するのが簡単ではないかと思います。また、文字列の上に表示されるフリガナのフォントサイズは小さいので、表示倍率を拡大して操作することをおすすめします。

フリガナを修正したいセルを選択して［Shift］＋［Alt］＋［↑］キーを押す（㉒）と、フリガナを編集できる状態になります

［←］キーを押して修正する箇所にカーソルを移動します。フリガナを修正して（㉓）、［Enter］キーを押します

フリガナを修正できました。PHONETIC関数の結果が変更されます（㉔）

フリガナを「ひらがな」で表示する

　設定の変更でフリガナを「ひらがな」で表示することも可能です。［ふりがなの表示/非表示］ボタンの右側［▼］から［ふりがなの設定］ダイアログボックスを呼び出します。

フリガナの設定を変更したいセルを選択（㉕）しておきます。［ふりがなの表示/非表示］ボタンの右側［▼］（㉖）をクリックして［ふりがなの設定］（㉗）をクリックします

［ふりがなの設定］ダイアログボックスが表示されました。［種類］から［ひらがな］（㉘）を選択して［OK］（㉓）をクリックします

フリガナを「ひらがな」に変更できました。PHONETIC関数の結果も変更されます（㉚）

フリガナの手入力は不要

　フリガナの利用機会は少ないので、困った時は手入力で解決しようとすることが多いと思います。今回紹介した「selection.setphonetic」を思い出してください。修正が必要としても手入力より効率的です。