打印输出方法产生损坏的PDF文件

当我执行以下代码时，生成的abc.pdf文件似乎已损坏。 有谁知道为什么，什么是解决scheme？ 但是，如果我拿出prtofilename我的代码似乎工作正常。 提前致谢。

Sub printpdf() Selection.PrintOut ActivePrinter:="adobe PDF", prtofilename:="ABC.pdf" End Sub