Question

如果我在Excel中放大得很远，然后转到“文件”>“导出”>“ PDF”，则内容加载项会缩小得非常远。另外，如果我在Excel中缩小得很远，然后使用File> Export> PDF，则内容加载项会放大得很远。

使用VBA代码时会发生相同的事情：

MySheet.Range("PDF_RANGE").ExportAsFixedFormat xlTypePDF, path, OpenAfterPublish:=True

这显然是Microsoft Office的错误，但是我能做些什么来缓解它吗？

注意：我无法在Excel2016中对此进行测试，这可能是仅Excel2013的问题。

Answer 1

这是缓解某些问题的简单解决方案：

Dim scu As Boolean: scu = Application.ScreenUpdating
Application.ScreenUpdating = False
    Dim zoom As Integer: zoom = ActiveWindow.zoom
    ActiveWindow.zoom = 100
        Master.Range("PDF_RANGE").ExportAsFixedFormat xlTypePDF, path, OpenAfterPublish:=True
    ActiveWindow.zoom = zoom
Application.ScreenUpdating = scu

不幸的是，即使将Application.ScreenUpdating设置为False，IE控件仍会重新呈现，但是希望这些问题在更高版本的Office中得以解决。

Excel的“打印为PDF”以不正确的缩放显示OfficeJS内容

1 个答案: