Vba 在ms access中使用followhyperlink后使用openform
我是个新手。我有两个文件,点击其中一个按钮,打开另一个表单:Vba 在ms access中使用followhyperlink后使用openform,vba,ms-access,Vba,Ms Access,我是个新手。我有两个文件,点击其中一个按钮,打开另一个表单: Private Sub ComMA_Click() FollowHyperlink "L:\Files\File.mdb" End Sub 而且它工作得很好 但是我想通过单击按钮打开第二个文件的特定表单(不是主表单)。大概是这样的: Private Sub ComMA_Click() FollowHyperlink "L:\Files\File.mdb" (Then DoCmd.OpenForm "frmTest") End Sub
Private Sub ComMA_Click()
FollowHyperlink "L:\Files\File.mdb"
End Sub
而且它工作得很好
但是我想通过单击按钮打开第二个文件的特定表单(不是主表单)。大概是这样的:
Private Sub ComMA_Click()
FollowHyperlink "L:\Files\File.mdb"
(Then DoCmd.OpenForm "frmTest")
End Sub
这是可能的还是有意义的?这段代码应该可以做到这一点。您遇到的问题是无法从第一个数据库中的代码引用第二个数据库。为此,您需要创建一个Access应用程序对象,并让该应用程序打开该文件。然后可以调用app对象在第二个数据库中打开表单 代码来自
Private Sub ComMA_Click()
Dim appAccess As Access.Application
Set appAccess = CreateObject("Access.Application")
appAccess.OpenCurrentDatabase "L:\Files\File.mdb"
appAccess.DoCmd.OpenForm "frmTest"
Set appAccess = Nothing
End Sub