用VBA 如何关闭已经代开的PDF文件

Sub VBA打开PDF文件_芐雨() CreateObject("Wscript.Shell").Run ("pdf文件路径+名称") ' 如:CreateObject("Wscript.Shell").Run ("F:\pdf\ABC.pdf") End Sub

导出PDF的语句添加一个不打开的参数，例如：

Sheet1.ExportAsFixedFormat Type:=xlTypePDF, OpenAfterPublish:=False

下面的代码测试成功：

实际使用中还应添加文件名等参数，所有可选参数有：

---