Método Fonts.Replace (PowerPoint)

Substitui uma fonte da coleção Fonts.

Sintaxe

expressão. Substituir (Original, Substituição)

Expressão Uma variável que representa um objeto Fonts .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Original	Obrigatório	String	O nome da fonte a substituir.
Replacement	Obrigatório	String	O nome da fonte de substituição.

Exemplo

Este exemplo substitui a fonte Times New Roman pela fonte Courier na apresentação ativa.

Application.ActivePresentation.Fonts _
    .Replace Original:="Times New Roman", Replacement:="Courier"

Confira também

Objeto Fonts

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.