【问题标题】:Exporting sheet template to PDF generates Runtime Error 5: Invalid Procedure call or argument将工作表模板导出为 PDF 会生成运行时错误 5:无效的过程调用或参数
【发布时间】:2012-12-27 11:23:15
【问题描述】:

我创建了一个宏来将工作表模板导出为 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

【问题讨论】:

    标签: excel vba excel-2007


    【解决方案1】:

    您的实际代码对我有用。不过试试这个(TRIED AND TESTED

    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 并重试...

    【讨论】:

    • 我已经在我的系统上安装了 Microsoft SaveAsPdf 设置,并且代码也开始为我工作。我不知道这是否是这个问题的真正解决方案,因为它要求每个使用此宏的客户端系统都必须安装此软件设置。谢谢。
    • 这很酷(+1)!我开始意识到,当在它们上调用 ExportAsFixedFormat 时,隐藏和非常隐藏的工作表也会引发运行时错误 5(无效的过程调用或参数)。
    【解决方案2】:

    我也遇到了这个错误,并尝试手动解决问题。

    当文件名(包括路径)超过 218 个字符时,您无法保存为 PDF。

    【讨论】:

    • 这个。我听说它是​​一个 255 个字符的限制......我今天已经达到了这个 218 个限制。 Excel 也可以只发出错误消息,例如“错误:发生错误”。
    【解决方案3】:

    您还必须安装 Excel 的免费 Microsoft Save as PDF or XPS add-in

    【讨论】:

      【解决方案4】:

      如果您安装了 adobe 打印机,则只需使用以下代码获取 pdf

      sub Sample()
          ActiveWorkbook.Sheets("Sheet2").Activate
          ActiveSheet.Printout
      End Sub
      

      【讨论】:

        猜你喜欢
        • 2016-05-27
        • 2018-07-25
        • 1970-01-01
        • 1970-01-01
        • 1970-01-01
        • 2022-10-08
        • 2019-06-13
        • 1970-01-01
        • 1970-01-01
        相关资源
        最近更新 更多