将筛选器应用于MSAccess中的表单

时间:2016-10-15 15:47:16

标签: ms-access access-vba

在MSAccess中,我有一份汇总记录的报告。我希望能够单击报告上的“Formdate”字段,并在“MAF视图”表单中打开相应的记录。

以下代码打开“MAF视图”表单,但将过滤器应用于报表而不是表单。如何将过滤器应用于表单?

Dim strFilter As Variant
strFilter = "[Formdate] = #" & Format(Me!FormDate.Value, "mm\/dd\/yyyy") & "#"
Me.Filter = strFilter
FilterOn = True
DoCmd.OpenForm "Maf View", , strFilter

1 个答案:

答案 0 :(得分:1)

DoCmd.OpenForm(FormName, View, FilterName, WhereCondition, DataMode, WindowMode, OpenArgs)

strFilter参数中有FilterName而不是WhereCondition。查询名称将在那里,但不是SQL WHERE条件。

要么

DoCmd.OpenForm "Maf View", , , strFilter

或 - 更好的可读性! - 使用命名参数:

DoCmd.OpenForm "Maf View", WhereCondition:=strFilter