共用方式為


Publisher (TextRange.MajorityParagraphFormat 屬性)

會傳回代表文字範圍中大部分段落所套用之段落格式的 ParagraphFormat 物件。

語法

運算式MajorityParagraphFormat

表達 代表 TextRange 物件的 變數。

傳回值

ParagraphFormat

範例

本範例將套用至第一個圖案的大部分段落的段落格式設定,套用至使用中文件第一頁的第二個圖案的段落上。 本範例假設至少有二個圖案位於使用中出版物的頁面一。

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 支援與意見反應