Fonts.Replace (PowerPoint)

Replaces a font in the Fonts collection.

Syntax : expression.Replace (Original, Replacement)

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

Arguments

The following arguments are required:

Original (String) - The name of the font to replace.

Replacement (String) - The name of the replacement font.