我有一份包含工作/任务详细信息的报告,还有一个为该报告提供大部分数据的表格。鉴于报告是查看数据大图的好方法,而表单是编辑数据的最佳方法,我希望能够单击一行,并让它打开相关记录表单视图。
有谁知道如何通过VBA 做到这一点?在我看来,这应该是可能的,尽管我对 Access 中的对象的了解有限。
Update
我为我的报告实现了以下代码:
Private Sub Edit_Click()
Dim EntityName As String
Dim DocName As String
DocName = "Entity: Overview"
strWhere = "[Entity Name]='" & Entity & "'"
DoCmd.OpenForm DocName, acNormal, , EntityName
End Sub
它成功打开了正确的表单,并且还获取了正确的实体名称,但它没有正确过滤。我看不出代码有什么问题。
In your Edit_Click()
程序,你有EntityName
as the 哪里条件参数为OpenForm
.
DoCmd.OpenForm DocName, acNormal, , EntityName
但是,您还没有分配任何内容给EntityName
,所以它是一个空字符串。我认为你应该使用strWhere
as the 哪里条件.
Private Sub Edit_Click()
Dim strWhere As String
Dim DocName As String
DocName = "Entity: Overview"
strWhere = "[Entity Name]='" & Me.Entity & "'"
DoCmd.OpenForm DocName, acNormal, , strWhere
End Sub
我以为Entity
是控件的名称,您可以在其中获取要构建的值strWhere
。如果报告中没有名称为Entity
,那么即使有一个代码也不会工作Entity
在原始查询中。
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)