Embedded Property

Applies To

Font object.

Description

True if the specified font is embedded in the presentation. Read-only Long.

Example

This example checks each font used in the active presentation to determine whether it's embedded in the presentation.

For Each usedFont In Presentations(1).Fonts
    If usedFont.Embedded Then
        MsgBox usedFont.Name & ": Embedded"
    Else
        MsgBox usedFont.Name & ": Not embedded"
    End If
Next usedFont