Propriedade Range.Font (Word)
Retorna ou define um objeto Font que representa a formatação do caractere do objeto especificado. Font de leitura/gravação.
Sintaxe
expressão. Fonte
expressão Uma variável que representa um objeto de Intervalo.
Comentários
Para definir essa propriedade, especifique uma expressão que retorne um objeto Font.
Exemplo
Este exemplo remove formatação com negrito do estilo Heading 1 no documento ativo.
ActiveDocument.Styles(wdStyleHeading1).Font.Bold = False
Este exemplo alterna a fonte do segundo parágrafo do documento ativo entre Arial e Times New Roman.
Set myRange = ActiveDocument.Paragraphs(2).Range
If myRange.Font.Name = "Times New Roman" Then
myRange.Font.Name = "Arial"
Else
myRange.Font.Name = "Times New Roman"
End If
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.