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.
Comentários
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.
Confira também
Referência do modelo de objeto do Word
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.