Home » ExcelVBA Rangeオブジェクト » Charactersオブジェクト » VBAでふりがなを一括削除する-Characters.PhoneticCharactersプロパティ

VBAでふりがなを一括削除する-Characters.PhoneticCharactersプロパティ

対象:Excel2000, Excel2002, Excel2003, Excel2007

VBA(Visual Basic for Applications)を使ってふりがなを設定・表示する方法をご紹介しています。


逆に、VBAでふりがなを削除するにはどうしたらいいのかといったご質問をいただくこともあります。

[スポンサードリンク]

ふりがなを設定するほうは、
 Selection.SetPhonetic
という1行だけでOKですが、削除するほうはループを回す必要があります。


Sub 選択されているセル範囲のふりがなをまとめて削除する()
 Dim rng As Range

 For Each rng In Selection
  rng.Characters.PhoneticCharacters = ""
 Next rng
End Sub

上記のマクロを実行すると、選択されているセルのふりがなをまとめて削除することができます。

選択範囲全体にループを回して、
  For Each rng In Selection

Rangeオブジェクトの、Charactersオブジェクトの、PhoneticCharactersプロパティに空白文字列を設定しています。
   rng.Characters.PhoneticCharacters = ""

関連語句
フリガナをまとめて削除する
[スポンサードリンク]

Home » ExcelVBA Rangeオブジェクト » Charactersオブジェクト » VBAでふりがなを一括削除する-Characters.PhoneticCharactersプロパティ

TrackBack:1

TrackBack URL
Characters.PhoneticCharactersは単なるデータを返すプロパティ from インストラクターのネタ帳
Characters.PhoneticCharactersは単なるデータを返すプロパティでPhoneticCharactersという名前のオブジェクトは存...

Home » ExcelVBA Rangeオブジェクト » Charactersオブジェクト » VBAでふりがなを一括削除する-Characters.PhoneticCharactersプロパティ

「Charactersオブジェクト」の記事一覧

検索


Copyright © インストラクターのネタ帳 All Rights Reserved.

.