VBA 打开PDF文件

Sub VBA打开PDF文件_芐雨()

    CreateObject("Wscript.Shell").Run ("pdf文件路径+名称")  

  ' 如:CreateObject("Wscript.Shell").Run ("F:\pdf\ABC.pdf") 

End Sub

比如 *** 作其它excel文件，等代码跑完，希望看到最后的结果，就需要最后添加打开文件的代码。

再比如爬虫的时候经常会用代码爬取网站的源代码，然后将源代码输入进文本文件，最后显示出来，方便查看。

再比如用代码将word文件另存为Pdf后，希望打开pdf文件查看下效果。

所有的这些都涉及到用vba代码打开文件的 *** 作，而不是人工手动打开。

---