Método Document.UpdateStyles (Word)
Copia todos os estilos do modelo anexado para o documento, sobrescrevendo quaisquer estilos existentes no documento que tenham o mesmo nome.
Sintaxe
expression. UpdateStyles
expression é obrigatório. Uma variável que representa um objeto Document.
Exemplo
Este exemplo copia os estilos do modelo anexado para todos os documentos abertos e fecha todos os documentos.
For Each aDoc In Documents
aDoc.UpdateStyles
aDoc.Close SaveChanges:=wdSaveChanges
Next aDoc
Este exemplo altera a formatação do estilo Heading 1 no modelo anexado ao documento ativo. O método UpdateStyles atualiza os estilos no documento ativo, incluindo o estilo Heading 1.
Set aDoc = ActiveDocument.AttachedTemplate.OpenAsDocument
With aDoc.Styles(wdStyleHeading1).Font
.Name = "Arial"
.Bold = False
End With
aDoc.Close SaveChanges:=wdSaveChanges
ActiveDocument.UpdateStyles
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.