API Documentation > CorelDRAW > 2025-v26 > PDFVBASettings > IPDFVBASettings
PDFVBASettings.EmbedFonts property
Specifies whether document fonts should be embedded
Syntax:
Property Get EmbedFonts() As Boolean
Property Let EmbedFonts(ByVal Value As Boolean)
Remarks:
The EmbedFonts property determines whether fonts are embedded in a PDF file.
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