尝试使用VBA在Excel中保存并打印单张纸

我一直在寻找我的经理正在进行的问题,我很难过,他试图得到它,所以当最终用户点击Excel工作表中的一个macros分配button时,它将一张纸保存为PDF并打印工作表太。

我已经得到了底部提供的图像显示的点,代码运行直到“ActiveSheet.ExportAsFixedFormat”行。 有没有人有什么build议我应该用什么来获得解释?

我真的很感激。

这是我到现在为止的代码:

Public Sub SavePrint() ChDir "Path-to-the-file" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "Path-to-the-file\ACT Form.pdf", Quality:=xlQualityStandard, _ IncludeDocProperties:=True, _ IgnorePrintAreas:=False, OpenAfterPublish:=True End Sub 

问候,基兰

注1: ChDir需要适当使用; 之后,您更改了path,您不需要将其包含在Filename ,Excel自动将文件保存在当前目录中。

注2:您需要PDF加载项才能使用ExportAsFuxedFormat 。 要确保您已经将它导航到Excel > File > Options > Add-Ins > (at the bottom) Manage: COM Add-ins然后findAdobe PDF或用于pipe理PDF的任何其他应用程序(例如NitroPDFBlueBeam )并检查框。 如果您没有Adobe PDF那么您需要将其安装到您的机器上,并在运行此macro之前在Excel中激活它(即,选中该框)。

 Public Sub SavePrint() ChDir "C:\" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "ACT Form.pdf", Quality:=xlQualityStandard, _ IncludeDocProperties:=True, _ IgnorePrintAreas:=False, OpenAfterPublish:=True End Sub 

这将把PDF文件保存在C:\文件夹中。

阅读这篇文章 ,了解更多关于ChDir

阅读这个获得有关ExportAsFixedFormat的见解。

您可以在这里find如何将Adobe PDF添加到Excel中。