Objeto Style (Word)
Representa um único estilo interno ou definido pelo usuário. O objeto Style inclui atributos de estilo (como fonte, estilo da fonte e espaçamento de parágrafo) como propriedades do objeto Style. O objeto de estilo é um membro dos estilos coleção. A coleção de estilos inclui todos os estilos no documento especificado.
Use estilos (Index), onde Index é o nome do estilo, uma constante WdBuiltinStyle ou um número de índice, para retornar um único estilo objeto. Você deve corresponder exatamente a ortografia e o espaçamento do nome do estilo, mas não necessariamente seu uso de maiusculas. O exemplo a seguir modifica o nome da fonte do estilo definido pelo usuário chamado "Color" no documento ativo.
ActiveDocument.Styles("Color").Font.Name = "Arial"
O exemplo a seguir define o estilo interno Heading 1 para que não seja negrito.
ActiveDocument.Styles(wdStyleHeading1).Font.Bold = False
O número de índice do estilo representa a posição do estilo na lista classificada em ordem alfabética de nomes de estilo. Observe que Styles(1)
esse é o primeiro estilo na lista alfabética. O exemplo a seguir exibe o estilo base e o nome do primeiro estilo da coleção Styles.
MsgBox "Base style= " _
& ActiveDocument.Styles(1).BaseStyle & vbCr _
& "Style name= " & ActiveDocument.Styles(1).NameLocal
Para aplicar um estilo a um intervalo, parágrafo ou parágrafos vários, definir o estilo propriedade com um nome de estilo interna ou definida pelo usuário. O exemplo seguinte aplica o estilo Normal para os quatro primeiros parágrafos do documento ativo.
Set myRange = ActiveDocument.Range( _
Start:=ActiveDocument.Paragraphs(1).Range.Start, _
End:=ActiveDocument.Paragraphs(4).Range.End)
myRange.Style = wdStyleNormal
O exemplo a seguir aplica o estilo Heading 1 ao primeiro parágrafo da seleção.
Selection.Paragraphs(1).Style = wdStyleHeading1
O exemplo cria o estilo de caractere "Bolded" e o aplica à seleção.
Set myStyle = ActiveDocument.Styles.Add(Name:="Bolded", _
Type:=wdStyleTypeCharacter)
myStyle.Font.Bold = True
Selection.Range.Style = "Bolded"
Use a OrganizerCopy método copiar estilos entre modelos e documentos. Use a UpdateStyles método de atualizar os estilos do documento ativo para coincidir com as definições de estilo do modelo anexado. Use a OpenAsDocument método de abrir um modelo como um documento para que você pode modificar os estilos do modelo.
Referência do modelo de objeto do Word
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.