将带有表单的工作表保存为 pdf

Question

我正在尝试将作品sheet 保存为 PDF，我成功地做到了这一点，但是当我打开生成的 PDF 文件时，sheet 中的所有文本框都变形了。

如何保持导出文本框的比例？

我在作品sheet中使用了一个执行以下代码的按钮：

ThisWorkbook.Sheets(1).Select

Sheets(1).Activate

ActiveSheet.ExportAsFixedFormat _
        Type:=xlTypePDF, _
        Filename:="\10.18.105.44\Setor Proteção RDs - Ordens de Ajustes\Banco de ordens\AL" & alimentador & "\" & nome_arquivo & ".pdf", _
        Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, _
        IgnorePrintAreas:=False, _
        OpenAfterPublish:=True

Sheets(1).Select
Range("D2").Select

Answer 1

我发现只有当我尝试将工作簿的缩放比例大于 100% 进行保存时，才会出现这种情况，当我以 100% 的缩放比例打印时，效果非常好。

将带有表单的工作表保存为 pdf

Saving worksheets with forms as pdf

pdf

excel

vba

userform

export-to-pdf