Compartilhar via

Propriedade TextStyle.NextParagraphStyle (Publisher)

  • Artigo

Retorna ou define uma Cadeia de Caracteres que representa o estilo de parágrafo que segue o estilo de texto especificado quando um usuário pressiona Enter. Leitura/gravação.

Sintaxe

expressão. NextParagraphStyle

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

Valor de retorno

Cadeia de caracteres

Exemplo

Este exemplo cria um novo estilo de texto e especifica que o estilo de texto que segue o novo estilo de texto é o estilo Normal.

Sub CreateNewTextStyle() 
 Dim styNew As TextStyle 
 Dim fntStyle As Font 
 
 Set styNew = ActiveDocument.TextStyles.Add(StyleName:="Heading 1") 
 Set fntStyle = styNew.Font 
 
 With fntStyle 
 .Name = "Tahoma" 
 .Bold = msoTrue 
 .Size = 15 
 End With 
 
 With styNew 
 .Font = fntStyle 
 .NextParagraphStyle = "Normal" 
 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.