HOME > 即効テクニック > Excel VBA > セル操作関連のテクニック > 右隣のセルにふりがなを表示する

即効テクニック

セル操作関連のテクニック

右隣のセルにふりがなを表示する

(Excel 97)
アクティブセルのふりがなテキストの文字列についての情報を表すPhoneticオブジェクトを返す、Phoneticプロパティを使います。
Sub Sample()
    ActiveCell.Offset(, 1).Value = ActiveCell.Phonetic.Text
End Sub
セルに名前等を入力します。そのセルを選択し、マクロを実行すると右隣のセルにふりがなが表示されます。