PDFVBASettings.SubsetFonts

Property SubsetFonts As Boolean

The SubsetFonts property determines whether fonts are subsetted in the document when publishing to PDF. You can use the SubsetPct property to set the maximum percentage of the character set used.

The following code example publishes the document to PDF. All of the document’s fonts are converted to Type 1 and embedded in the PDF file along with the base 14 fonts. Fonts are subset if less than 80% of their character set is used.

Sub Test() 
 With ActiveDocument.PDFSettings 
  .EmbedBaseFonts = True 
  .EmbedFonts = True 
  .SubsetFonts = True 
  .SubsetPct = 80 
  .TextAsCurves = False 
  .TrueTypeToType1 = True 
 End With 
 ActiveDocument.PublishToPDF "C:\MyDocument.pdf" 
End Sub