Question

我有一个表（表1），其中包含PDF文件列表及其表格（表格1）。

In＆＃34; Table1＆＃34;我有一个超链接字段（PDF），我想要一个按钮在＆＃34; Form Table1＆＃34;打开那个超链接。我尝试选择此按钮，转到事件＆gt;点击＆gt;代码生成器并输入

Private Sub Command1_Click()
Application.FollowHyperlink PDF, , True
End Sub

我应该用什么方法来实现这个目标？

Answer 1

一种简单的方法是通过使用某个VBA引用HyperlinkAddress来引用pdf文件的位置。将此代码放在按钮或任何您喜欢的事件上：

Private Function Get_Link()
   Me![mybutton].HyperlinkAddress = _
   Nz(DLookup("[filename]", "[my_files_table]","[my_files_table].[id]=" & Me![id]), "")
End Function

要更新超链接，您可以通过触发以下事件来引用表单中的超链接ID或主键：OnCurrent: Get_Link()

这将检索表单上的当前ID，并使用它来获取所需的超链接。

参考：Bytes.com

超链接按钮可打开文件

1 个答案: