VBA 导出为 PDF 丢失轮廓

Question

当我使用 VBA 导出为 PDF 时，我丢失了一些格式。

我正在尝试使用 VBA 将选定的一组选项卡导出为 PDF。如果我使用下面的代码它可以工作并且格式是完美的但我必须使用弹出框来保存文件位置：

ActiveWindow.SelectedSheets.PrintOut From:=1, To:=iTotal, Copies:=1, _
Preview:=False, ActivePrinter:="Microsoft Print to PDF", Collate:=True, _
PrToFileName:=sPath & sFile, IgnorePrintAreas:=False

相反，我想使用以下代码导出为 PDF，因为这只是将文件保存到指定路径而无需我进行交互。

    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
        Filename:=sPath & sFile, Quality:=xlQualityMaximum, _
        IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False

问题是如果我使用导出代码格式不太正确。一些轮廓似乎缺失，因此边缘周围有间隙。

有谁知道为什么使用导出而不是打印格式不同？

Answer 1

.PrintOut

仅显示对话框，如果您为

PrToFileName

提供空字符串，或者如果您省略

PrToFileName

参数。

如果我提供有效的文件名，这两个代码演示都可以在我的机器上运行，而不会显示询问 pdf 文件名的对话框。