如何解决PDF 输出大小不是 A4 ExportAsFixedFormat
我创建这个电子表格是为了让财务审批表格在工作中更容易一些。您填写一个表格，它会在 Excel 上填充一个文档，将其导出为 PDF 并将其附加到电子邮件中，并根据团队和请求的价值将其与正确的同事抄送。
我今天推出了这个，但我在文件大小方面遇到了一些问题。它在我的系统上运行良好，但今天一位同事尝试使用它并切断了 PDF 的一侧。它似乎以 Letter 而不是 A4 格式导出。只要不截断任何信息，我不介意导出它的大小。
我在网上看到过一些解决方案，我可以更改打印机设置等，但这是不可能的，因为它是一个大型组织，而且我从事的是业务支持，而不是 IT。我无法为每个人全局更改 excel/打印机设置，与我一起工作的人在技术上不是很懂，所以我不想混淆他们。该电子表格将分发给我的同事，让他们拥有自己的副本。我可以在 VBA 中进行任何更改以设置文件大小以阻止这种情况发生吗？
Set xUsedRng = ws.UsedRange
If Application.WorksheetFunction.CountA(xUsedRng.Cells) <> 0 Then
'Save as PDF file
ws.ExportAsFixedFormat Type:=xlTypePDF,Filename:=xFolder,Quality:=xlQualityStandard
'Create Outlook email
Set xOutlookObj = CreateObject("outlook.application")
Set xEmailObj = xOutlookObj.CreateItem(0)
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。
