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