Objeto FontNames (Word)

Representa uma lista dos nomes de todas as fontes disponíveis.

Comentários

Use a propriedade FontNames, LandscapeFontNames ou PortraitFontNames para retornar o objeto FontNames. O exemplo a seguir exibe o número de fontes de retrato disponíveis.

MsgBox PortraitFontNames.Count & " fonts available"

Este exemplo lista todos os nomes de fonte no objeto FontNames no final do documento ativo.

For Each aFont In FontNames 
 ActiveDocument.Range.InsertAfter aFont & vbCr 
Next aFont

Use FontNames (Index), onde Index é o número de índice, para retornar o nome de uma fonte. O exemplo a seguir exibe o primeiro nome da fonte do objeto FontNames.

MsgBox FontNames(1)

Observação

[!OBSERVAçãO] Você não pode adicionar ou remover nomes na lista de nomes de fontes disponíveis.

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.