vba - Excel 转 PDF 问题

Question

所以我有这个简单的小代码，可以通过 Excel 工作表上的命令按钮将 Excel 工作表转换为 PDF:

Sub Save_Excel_As_PDF()

    ActiveSheet.ExportAsFixedFormat _
                  Type:=xlTypePDF

End Sub

问题是我必须先手动执行这些步骤(另存为，然后 PDF 等)，以便在我先执行手动步骤后按钮才能工作。

我想将其保存在任何地方，只需单击按钮即可创建 PDF，而无需先执行所有初始手动步骤。可以修改这段代码来做到这一点吗？

Answer 1

如果不指定 FileName 参数，PDF 将保存在您的 Documents 文件夹中。在某个文件夹中手动另存为后，下次它将在同一文件夹中创建。

您根本不需要这个，您可以通过指定 FileName 参数在与工作簿相同的文件夹中创建文件，并使用与工作表名称相同的名称:

 ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
     FileName:=ThisWorkbook.Path & "\" & ActiveSheet.name

您可以指定 ThisWorkbook.Path 之外的其他名称或文件夹。