Home » Excel VBA Rangeオブジェクト » マクロでフリガナをふる－Range.SetPhoneticメソッド

マクロでフリガナをふる－Range.SetPhoneticメソッド

対象：Excel2000, Excel2002, Excel2003

Excelのふりがな機能に関連する記事を、ご紹介してきました。

特にExcelをデータベースとして使う場合に、ふりがなは重要かつ便利な機能です。
けれども、あくまでもExcelで入力が行われたときの読みをふりがなと仮定して保持しているだけ、という問題点もあります。

フリガナの情報がなければフリガナは表示できない

ふりがな（読み）の情報を持っていなければ、ふりがなは表示されないのです。

実務の中では、例えば、他のデータベースからCSVファイルをエクスポートして、ExcelでそのCSVファイルをインポートして利用するといったことはよくあります。

こういったデータでは読みの情報は保持されていませんから、メニュー［書式］−［ふりがな］−［表示/非表示］を実行したところでふりがなは表示されません。

［スポンサードリンク］

このようなデータにふりがなを表示させるには、マクロを使いましょう。

Sub 選択セルにフリガナをふる()
　Selection.SetPhonetic
　Selection.Phonetics.Visible = True
End Sub

まず、RangeオブジェクトのSetPhoneticメソッドでふりがなを設定して、

Selection.SetPhonetic

その後PhoneticsオブジェクトのVisibleプロパティで、

Selection.Phonetics.Visible = True

で設定したふりがなを表示しています。

「Selection.Phonetics.Visible = True」は、メニュー［書式］−［ふりがな］−［表示/非表示］をクリックするのと同じことです。

今回はマクロの形でご紹介しましたが、実はマクロにしなくてもふりがなを設定することはできます。~~その方法は近日に別途ご紹介します。~~イミディエイトウィンドウで「Selection.SetPhonetic」を実行する操作を記事にしました（2005-08-22）。

［スポンサードリンク］

Home » Excel VBA Rangeオブジェクト » マクロでフリガナをふる－Range.SetPhoneticメソッド

『インストラクターのネタ帳』では、2003年10月からMicrosoft Officeの使い方などを紹介し続けています。
Excel VBA経験者の方に向けて、Word VBAの基本をキンドル本にしました↓↓

Excel VBAユーザーの方を対象として、Wordの表をVBAで操作する基礎をまとめました↓↓

日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓

上記のExcel VBAユーザー向けのPython超入門書の、元になったキンドル本です↓↓

グラフを操作するExcel VBAの基本を解説したキンドル本も出しました↓↓

図形を操作するExcel VBAの基本を解説したキンドル本を書きました↓↓

『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓

PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓

Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓

小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓

Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓

数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓

「Excel VBA Rangeオブジェクト」の記事一覧