Compartilhar via


Propriedade TextRange.MajorityParagraphFormat (Publisher)

Retorna um objeto ParagraphFormat que representa a formatação de parágrafo aplicada a maioria de parágrafos em um intervalo de texto.

Sintaxe

expressão. MajorityParagraphFormat

Expressão Uma variável que representa um objeto TextRange .

Valor de retorno

ParagraphFormat

Exemplo

Este exemplo aplica a formatação de parágrafo aplicada a maioria dos parágrafos na primeira forma aos parágrafos na segunda forma na primeira página do documento ativo. Este exemplo pressupõe que existe pelo menos uma forma na primeira página da publicação ativa.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.