Excel - VBA - ExportAsFixedFormat PDF文件大小太大

Question

使用宏将工作表的副本另存为PDF到我的桌面。但是，使用我的宏时实际文件大小会导致文件大小增加两倍或三倍，如果我手动在Excel中，则转到Acrobat选项卡并创建PDF。我需要进一步减少pdf的文件大小。我设置了一个小的打印区域，尝试使用最小质量，手头减少图像大小等。是否有更好的替代方法来打印文件较小的工作表的PDF？文件之间的差异是100kb，而280kb。

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Quality:=xlQualityMinimum, IgnorePrintAreas:=False, Filename:="C:\

Answer 1

过去，当我需要以编程方式从Excel文件创建.pdf时，我遇到了与文件大小完全相同的问题。

一种解决方法，虽然不是特别优雅，但可能是以编程方式模拟使用SENDKEYS手动将文件另存为.pdf所需的确切键盘/鼠标操作。

最终结果应该是手动完成整个过程所能获得的可接受的图像质量和较小的文件大小。

密钥的确切顺序可能因您的特定机器，Excel版本等而异...但您可以尝试这样做：

Application.SendKeys "%fy1{Enter}"

您可能需要使用您尝试模拟的击键序列。但那应该做你想做的事。