Objeto ParagraphFormat (Publisher)
Representa toda a formatação de um parágrafo.
Comentários
Use a propriedade TextStyle.ParagraphFormat para retornar o objeto ParagraphFormat para um parágrafo ou parágrafos. A propriedade ParagraphFormat retorna um objeto ParagraphFormat para uma seleção, intervalo ou estilo.
Use o método Duplicate para copiar um objeto ParagraphFormat existente.
Exemplo
O exemplo seguinte centraliza o parágrafo na posição do cursor. Este exemplo pressupõe que a primeira forma é uma caixa de texto e não outro tipo de forma.
Sub CenterParagraph()
Selection.TextRange.ParagraphFormat _
.Alignment = pbParagraphAlignmentCenter
End Sub
O exemplo a seguir duplica a formatação de parágrafo do primeiro parágrafo na publicação ativa e armazena a formatação em uma variável. Este exemplo duplica um objeto ParagraphFormat existente e, em seguida, o recuo à esquerda é alterado para uma polegada, cria uma nova caixa de texto, insere texto nele e aplica formatação de parágrafo do formato de parágrafo duplicado ao texto.
Sub DuplicateParagraphFormating()
Dim pfmtDup As ParagraphFormat
Set pfmtDup = ActiveDocument.Pages(1).Shapes(1).TextFrame _
.TextRange.ParagraphFormat.Duplicate
pfmtDup.LeftIndent = Application.InchesToPoints(1)
With ActiveDocument.Pages.Add(Count:=1, After:=1)
With .Shapes.AddTextbox(pbTextOrientationHorizontal, _
Left:=72, Top:=72, Width:=200, Height:=100)
With .TextFrame.TextRange
.Text = "This is a test of how to use " & _
"the ParagraphFormat object."
.ParagraphFormat = pfmtDup
End With
End With
End With
End Sub
Métodos
Propriedades
- Alignment
- Application
- AttachedToText
- CharBasedFirstLineIndent
- FirstLineIndent
- KashidaPercentage
- KeepLinesTogether
- KeepWithNext
- LeftIndent
- LineSpacing
- LineSpacingRule
- ListBulletFontName
- ListBulletFontSize
- ListBulletText
- ListIndent
- ListNumberSeparator
- ListNumberStart
- ListType
- LockToBaseLine
- Responsável
- RightIndent
- SpaceAfter
- SpaceBefore
- StartInNextTextBox
- Guias
- TextDirection
- TextStyle
- UseCharBasedFirstLineIndent
- WidowControl
Confira também
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.