启动位于当前项目路径中的pdf文件

时间:2018-06-05 16:07:28

标签: vba ms-access access-vba

我希望用户能够将Project文件夹放在他们选择的任何位置。如果我使用:

Application.FollowHyperlink ("C:\Program Files(x86)\Project\reference.pdf")

仅当用户将Project文件夹放在Program Files(x86)文件夹中时,才会启动pdf文档。有没有办法访问参考当前路径?我没试过下面的代码。

Private Sub referencefile_Click()
Application.FollowHyperlink (".\reference.pdf")
End Sub

我试过了:

 Application.FollowHyperlink (CurrentProject.Path & "\reference.pdf"), 
 NewWindow:=True

这适用于txt文件,但不适用于pdf文件。有什么想法吗?

1 个答案:

答案 0 :(得分:1)

快速检查并确保我的pdf文件没有损坏。

Application.FollowHyperlink (CurrentProject.Path & "\reference.pdf"), NewWindow:=True

只要pdf文件退出与前端相同的位置,上述代码就可以正常工作。如果您曾想过在手动输入控制按钮属性的超链接时消除访问权限,则此代码可能是一个很好的解决方案。