Document.SaveSubsetFonts (Word)

True, wenn Microsoft Word eine Untermenge der eingebetteten TrueType-Schriftarten mit dem Dokument speichert.

Wenn weniger als 32 Zeichen einer TrueType-Schriftart in einem Dokument verwendet werden, bettet Word die Untermenge (nur die verwendeten Zeichen) in das Dokument ein.

With Documents("MyDoc") 
 .EmbedTrueTypeFonts = True 
 .SaveSubsetFonts = True 
 .Save 
End With