SubstituteFont Method

  • Article

Sets font-mapping options, which are reflected in the Font Substitution dialog box (Compatibility tab, Options dialog box, Tools menu).

expression**.SubstituteFont(UnavailableFont**, SubstituteFont)

expression Required. An expression that returns an Application object.

UnavailableFont    Required String. The name of a font not available on your computer that you want to map to a different font for display and printing.

SubstituteFont    Required String. The name of a font available on your computer that you want to substitute for the unavailable font.

Example

This example substitutes Courier for CustomFont1.

Application.SubstituteFont UnavailableFont:= "CustomFont1", _
    SubstituteFont:= "Courier"

Applies to | Application Object