API Documentation > CorelDRAW > 2025-v26 > PDFVBASettings > IPDFVBASettings
PDFVBASettings.SubsetFonts property
Specifies whether only the used portion of font definition should be embedded
Syntax:
Property Get SubsetFonts() As Boolean
Property Let SubsetFonts(ByVal Value As Boolean)
Remarks:
The SubsetFonts property determines whether fonts are subset in a document when publishing to PDF. You can use the PDFVBASettings.SubsetPct property to set the maximum percentage of the character set used.
Examples:
The following VBA 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