如何导出Office 365中带特定缩放比例的docx文件为保留该缩放比例的PDF？

这个需求确实有点绕，因为Word默认导出PDF的时候，不会把你在Word里设置的文档显示缩放同步成PDF的默认打开缩放。不过别担心，我给你两种实用的解决办法：

方案一：手动设置PDF初始视图（适合偶尔操作的情况） #

如果你只是偶尔需要转一两份文档，手动设置就够了：

• 打开已经设置好目标缩放比例的Word文档，先确认当前显示缩放是你要的数值（比如130%）
• 点击「文件」→「导出」→「创建PDF/XPS文档」，然后点击「创建PDF/XPS」按钮
• 在弹出的“发布为PDF或XPS”对话框里，别急着点“发布”，先点击右下角的「选项」按钮
• 在弹出的“选项”窗口里，拉到最下面找到「PDF选项」区域，把「缩放」选项改成自定义，然后输入你在Word里设置的那个比例（比如130）
• 点击「确定」再点「发布」，生成的PDF打开时就会默认用你设置的缩放比例了

方案二：用VBA宏自动同步（适合经常批量操作的情况） #

如果要处理很多文档，手动输入太麻烦，写个简单的VBA宏能一键搞定——它会自动读取当前Word文档的缩放比例，导出PDF时直接把这个比例设为默认打开缩放：

1. 打开目标Word文档，按Alt + F11打开VBA编辑器
2. 右键点击左侧的当前文档名称，选择「插入」→「模块」
3. 把下面这段代码粘贴进去：

Sub ExportPDFWithMatchingZoom()
    Dim targetZoom As Integer
    Dim savePath As Variant
    
    ' 获取当前文档的显示缩放比例
    targetZoom = ActiveDocument.ActiveWindow.View.Zoom.Percentage
    
    ' 弹出保存对话框，选择PDF的保存位置和文件名
    savePath = Application.GetSaveAsFilename( _
        FileFilter:="PDF 文件 (*.pdf), *.pdf", _
        Title:="导出带匹配缩放的PDF")
    
    If savePath <> "False" Then
        ' 导出PDF并应用目标缩放比例
        ActiveDocument.ExportAsFixedFormat _
            OutputFileName:=savePath, _
            ExportFormat:=wdExportFormatPDF, _
            OpenAfterExport:=True, _
            OptimizeFor:=wdExportOptimizeForPrint, _
            Range:=wdExportAllDocument, _
            IncludeDocProps:=True, _
            CreateBookmarks:=wdExportCreateWordBookmarks
    End If
End Sub

4. 按F5运行宏，跟着提示选好保存路径，导出的PDF就会自动继承Word里的缩放比例了

补充小提示 #

要注意：Word里的“显示缩放”是当前文档的查看比例，一定要确保导出前这个数值是你想要的；另外像Edge、Chrome自带的免费PDF阅读器，都会遵守PDF里设置的初始缩放规则，打开时自动应用。

备注：内容来源于stack exchange，提问作者Manuel Jordan