Fix blurry and foreign fonts in PDF-XChange Editor during printing

Jakov93 · #1 02-28-2024, 09:49 AM

Hi,
I use this macro to export the doc to pdf

Code:

Sub SaveAsPDF()

Dim strDocName As String
Dim strPath As String
Dim intPos As Integer
Start:
    strDocName = ActiveDocument.Name
    strPath = ActiveDocument.path & "\"
    intPos = InStrRev(strDocName, ".")
    If intPos = 0 Then
        ActiveDocument.Save
        GoTo Start
    End If
    strDocName = Left(strDocName, intPos - 1)
    strDocName = strPath & strDocName & ".pdf"

    ActiveDocument.ExportAsFixedFormat OutputFileName:=strDocName, _
                                       ExportFormat:=wdExportFormatPDF, _
                                       OpenAfterExport:=False, _
                                       OptimizeFor:=wdExportOptimizeForPrint, _
                                       range:=wdExportAllDocument, From:=1, To:=1, _
                                       Item:=wdExportDocumentContent, _
                                       IncludeDocProps:=True, _
                                       KeepIRM:=True, _
                                       CreateBookmarks:=wdExportCreateHeadingBookmarks, _
                                       DocStructureTags:=True, _
                                       BitmapMissingFonts:=True, _
                                       UseISO19005_1:=False
lbl_Exit:
    Exit Sub
End Sub

But the exported file shows misformatted text for italic text only (red underlined), as shown below
Wuchereria bancrofti mis.jpg
These misformatted texts also appear on printed paper
I tried many solutions including save as pdf option and contacted the PDF-XChange Editor support service, they gave many other solutions, but also no change.
Today, I installed Adobe Acrobat addon, also when I exported the file, it appeared normally, as shown below (green underlined)
Wuchereria bancrofti right.jpg
Additionally, I exported the file using Microsoft Print to pdf, and it also appears normally.
So, I concluded the issue was caused by the exporting method "ExportAsFixedFormat"
Is my conclusion right or there are other causes?
However, according to the previous macro, I want to save my document as pdf in the current folder and name by printer method such as "Microsoft print to pdf", not by "ExportAsFixedFormat", in order to ignore the issue.
Thanks

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Cross Reference or VBA Editor to update while printing	robertcraft	Word	1	03-19-2018 01:13 PM
Foreign Language Fonts	BrazzellMarketing	Windows	0	07-30-2013 06:45 PM
Fonts error when I used 2 types of fonts in 1 file	cmengenie	Word	3	03-18-2012 02:49 PM
Spell checker with foreign fonts	jcsherwoods	Word	4	02-12-2012 07:15 PM
Foreign Language Help	SeaTan	Word	1	11-08-2010 11:32 PM