首页 文章

强制excel超链接打开Acrobat Reader而不更改系统默认的pdf阅读器

提问于
浏览
0

由于许多用户可能有不同的PDF编辑/审阅程序,但由于IT策略,所有用户都有Acrobat阅读器,我想要一个excel超链接来使用Acrobat阅读器打开PDF网址 .

我还没有找到这个,但有一些url前缀替代 file://... 类似于 acrobat://...

PDF文件位于本地网络上,而不是Internet .

想要Acrobat的原因让我可以使用PDF打开参数:https://www.adobe.com/content/dam/acom/en/devnet/acrobat/pdfs/pdf_open_parameters.pdf

1 回答

  • 0

    以下子将从本地驱动器打开PDF文件 .

    Sub OpenPDFbyAdobeReader()
        Dim OpenFile
        OpenFile = Shell("C:\Program Files (x86)\Adobe\Reader 11.0\Reader\AcroRd32.exe E:\TestFolder\TestFile.pdf", vbNormalFocus)
    End Sub
    

    您可能需要更改adobe acrobat reader在PC中安装的路径 . 用网络路径替换文件路径 . 我不使用网络路径测试它 . 但是我的PC使用本地驱动器文件路径测试代码 .

    编辑:

    以下代码适用于网络路径 .

    Sub OpenPDFbyAdobeReader()
        Dim OpenFile
        OpenFile = Shell("C:\Program Files (x86)\Adobe\Reader 11.0\Reader\AcroRd32.exe \\MyDesktop-PC\Share_Folder\Test_File.pdf", vbNormalFocus)
    End Sub
    

    \\MyDesktop-PC\Share_Folder\Test_File.pdf 是位于网络路径上的文件 . 您已确保对该文件的访问权限 .

相关问题