TextRange.MajorityParagraphFormat プロパティ (Publisher)

テキスト範囲内のほとんどの段落に適用されている段落書式を表す ParagraphFormat オブジェクトを取得します。

構文

式。MajorityParagraphFormat

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

戻り値

ParagraphFormat

例

次の使用例は、作業中の文書の先頭ページで、1 番目の図形のほとんどの段落に適用されている段落書式を 2 番目の図形の段落に適用します。 この使用例では、作業中の文書の 1 ページ目に少なくとも 2 つの図形が存在することを前提としています。

Sub SetFontName() 
 Dim fmt As ParagraphFormat 
 With ActiveDocument.Pages(1) 
 Set fmt = .Shapes(1).TextFrame.TextRange _ 
 .MajorityParagraphFormat 
 .Shapes(2).TextFrame.TextRange.ParagraphFormat = fmt 
 End With 
End Sub

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

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