出口片模板PDF生成运行时错误5：无效的过程调用或参数

Question

我创建了一个宏的工作表模板导出为PDF：

ActiveWorkbook.Sheets("Sheet2").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
  ActiveWorkbook.Path & "\Survey Report.pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
  :=False, OpenAfterPublish:=True

我尝试了其他的方式，但它使错误没有什么区别。

链接已经尝试：

1. http://www.mrexcel.com/forum/excel-questions/608810-printing-multiple-worksheets-pdf-2.html
2. http://www.mrexcel.com/forum/microsoft-access/385749-exportasfixedformat-error.html
3. http://answers.microsoft.com/en-us/office/forum/office_2010-customize/error-5-invalid-procedure-call-or-argument/574c2c8f-7f2c-4644-9373-bbc14c8d3fd7?msgId=4dbee3f3-ad28-4427-a50b-a3904b09ec1e

Answer 1

你的实际代码为我工作。然而试试这个（久经考验的）

Sub Sample()
    ActiveWorkbook.Sheets("Sheet2").Activate

    ActiveSheet.ExportAsFixedFormat _
    Type:=xlTypePDF, _
    Filename:=ActiveWorkbook.Path & "\Survey Report.pdf", _
    Quality:=xlQualityStandard, _
    IncludeDocProperties:=True, _
    IgnorePrintAreas:=False, _
    OpenAfterPublish:=True
End Sub

注意：

1. 同时也希望Sheet2有东西在它打印别的一张白纸会给你的错误。
2. 如果你想，你正在运行的代码从工作簿打印纸，那么你可能想改变ActiveWorkbook到ThisWorkbook，然后再试一次...

Answer 2

此外，还必须安装Excel免费qazxsw POI。

Answer 3

如果你有再安装Adobe打印机只需使用下面的代码来获得一个pdf

Microsoft Save as PDF or XPS add-in

Answer 4

我也得到了这个错误，并试图做手工的工作出了问题。

事实证明，你不能保存为PDF时的文件名（包括路径）超过218个字符。