マクロでフリガナをふろう！
エクセルをデータベースとして使う際、個々のデータに「フリガナ」をふる機能は重要な機能となります。
フリガナの機能には、「フリガナをふる」、「PHONETIC関数を使ってフリガナを取得する」などいろいろな機能があります。
ところが、日本語入力と漢字の関係性から言っても万全ではないのが残念なところです。
さらに弱点として、フリガナはエクセル上で行われた入力の読みを保持しているだけですので、読み（ふりがな）の情報を持っていなければ、フリガナが画面上に表示されることはありません。
たとえば、ＣＳＶファイルの形式からをエクセル上にインポートしてデータを使用するような場合は、当然、フリガナの情報は保持されていない状態でインポートされます。
ですので、フリガナのツール、「メニュー［書式］→［ふりがな］→［表示/非表示］」を実行してもフリガナがふられることはありません。
このような場合には、「PHONETIC関数」を使ってマクロでフリガナをふる方法があります。
＜PHONETIC関数でフリガナをふるマクロ＞
Sub Phonetic-Furigana()
Selection.SetPhonetic
Selection.Phonetics.Visible = True
End Sub
上記のようなマクロを作成して、フリガナをふりたいセルで実行するようにすると、フリガナを自動取得することが出来るようになります。