使用ExportAsFixedFormat命令出错

Question

我正试图调试一些包含ExportAsFixedFormat的代码，该代码导致 "Automation error the object invoked has disconnected from its clients. "错误消息。我在2013年运行，所以不需要PDFXPS插件，而且该函数在工作簿的其他地方工作。这似乎与我试图制作PDF的页面有关。虽然主宏比较长，但当我使用这段简单的代码时，也会出现同样的错误。

Sub NewAssetScreen()

    Sheets("New Asset").Select
    Sheets("New Asset").Activate

    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Quality:=xlQualityStandard, _
                                   IgnorePrintAreas:=False, OpenAfterPublish:=True

    Sheets("New Asset").Select
    Range("A1").Select

End Sub

但是如果我用不同的工作表名称运行宏，它就会正常工作。选择部分似乎没有问题--也就是说，在该工作表名称下可以工作，但只是ExportAsFixedFormat命令在页面上无法工作。

对于为什么会出现这种情况，有什么见解吗？

先谢谢你。

Nic

Answer 1

检查分页符和该工作表特有的其他东西。尝试使用 Sheets("New Asset").ExportAsFixedFormat 而不是 ActiveSheet. 最后，尝试将 "新资产 "工作表的内容复制并粘贴到新工作表中，并删除旧工作表。

Answer 2

确保在你使用的任何工作表字段中没有""或其他非文件名字符。我的问题发生在打印100张工作表时，有2张会失败。在经历了许多挫折之后，我发现在一个标题中，我使用了""来命名文件:)