FindReplace.MatchWidth プロパティ (発行元)

検索操作が検索されたテキストの文字幅と一致するかどうかを表す ブール値を 設定または返します。 値の取得と設定が可能です。

構文

式。MatchWidth

式FindReplace オブジェクトを表す変数。

戻り値

Boolean

注釈

このプロパティは、オペレーティング システムで有効になっている言語によっては使用できない可能性があります。 既定値は False です。

東アジア言語が有効になっていない場合は、"アクセスが拒否されました" を返します。

例

次の例では、アクティブな文書内で出現する "width" という単語を検索し、太字の書式を設定します。 フルまたは半角文字両方見つけることができるように、 MatchWidth プロパティは False に設定します。 たとえば、この検索が"width"(半角文字) という単語と単語に太字の書式を適用するが"w 私 d t h」(全角文字)。

Dim objDocument As Document 
Set objDocument = ActiveDocument 
With objDocument.Find 
 .Clear 
 .FindText = "width" 
 .MatchWidth = False 
 Do While .Execute = True 
 .FoundTextRange.Font.Bold = msoTrue 
 Loop 
End With

次の例では、アクティブな文書内で出現する "width" という単語を検索し、太字の書式を設定します。 完全または半分の幅の文字のいずれかを見つけることができるように、 MatchWidth プロパティは True に設定します。 たとえば、"width"に太字の書式が適用されます。 単語に書式設定は適用されません"w i d t h」です。

Dim objDocument As Document 
Set objDocument = ActiveDocument 
With objDocument.Find 
 .Clear 
 .FindText = "width" 
 .MatchWidth = True 
 Do While .Execute = True 
 .FoundTextRange.Font.Bold = msoTrue 
 Loop 
End With

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。

  • Last updated on