访问数据库报告：使用按钮

Question

我正在为我的按钮写一些代码：“打开”。如果单击，将自动打开具有该“文件地址”的文件：

我有以下VBA函数，它将文件位置作为输入字符串。我的问题是，如何将“文件位置”列中的C：...链接引用到函数的输入？我的意思是，这不起作用（但是如果我注释掉这个函数，并取消注释sub，我会弹出窗口，说嗨！）：

Trying to refer to another column inside the report

那我该怎么办？

Answer 1

删除声明并设置strURLLink的两行。

您可以通过按钮单击事件调用该函数。

Private Sub Command35_Click()
x = OpenDocument(Me![File Location])
End Sub

但是，它实际上并不需要是一个函数，可能是一个Sub。

为什么不直接在Click事件按钮？

Private Sub Command35_Click()
    On Error GoTo Catch
    Application.FollowHyperlink(Me![File Location])
    Exit Sub
Catch:
    MsgBox "Oops! Can't open file"
End Sub

这不是宏代码，而是VBA。 Access中的宏编码非常不同。

Answer 2

有效!!!这就是每个人：

单击“设计视图”中的“打开”按钮。在属性表中，选择[事件过程]，然后单击“...”进入一个可以编写VBA代码的窗口。确保以下两个红色框内的字符串匹配如下：

Match the field name

请注意，字符串“Main_File Location”应该是您在引用此报告的表格中设置的确切列名称。

此外，请确保您的文件名显示它是哪种类型的文件。例如，如果您的文件名是myfile1，这是一个PNG文件，那么您的文件位置必须是：C：\ somepath \ myfile1.png。如果是excel：C：\ somepath \ myfile1.xlsx。或者，Sub无法打开文档。