Font.Duplicate method (Publisher) (Método Font.Duplicate [Publisher])

Cria uma duplicata do objeto Font especificado e retorna o novo objeto Font.

Sintaxe

expressão. Duplicar

expressão Uma variável que representa um objeto Tipo de Letra .

Valor de retorno

Fonte

Exemplo

O exemplo a seguir duplica as informações de formatação de caracteres do intervalo de texto na forma um na página um da publicação ativa e a aplica ao intervalo de texto na forma dois.

Dim fntTemp As Font 
 
With ActiveDocument.Pages(1) 
 Set fntTemp = _ 
 .Shapes(1).TextFrame.TextRange.Font.Duplicate 
 .Shapes(2).TextFrame.TextRange.Font = fntTemp 
End With

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.