使用窗体ComboBox筛选MS Access报表失败求助

你的代码有两个核心问题导致筛选不生效，修正后就能正常工作：

问题1：参数顺序错误 #

DoCmd.OpenReport的第三个参数是已保存的查询筛选名称，而你要写的字段筛选条件应该放在**第四个参数（WhereCondition）**的位置。原代码把筛选条件放错了位置，Access会忽略这个无效参数，直接加载全部数据。

问题2：文本字段筛选缺少单引号 #

如果ProductName是文本类型字段，筛选值必须用单引号包裹，否则Access无法识别为字符串匹配，会导致筛选逻辑失效。

修正后的代码 #

Private Sub OpenReport_Click()
    ' 处理空值情况，避免报错
    If Not IsNull(Me.Combo202) Then
        DoCmd.OpenReport "Warehouse Stock Summary", acViewReport, , "[ProductName] = '" & Me.Combo202 & "'"
    Else
        MsgBox "请选择一个产品名称！"
    End If
End Sub

额外检查点 #

• 确认Combo202的控件名称完全正确，没有拼写错误（比如大小写、数字是否对应）
• 确认ProductName是报表数据源（查询/表）中的准确字段名，没有拼写错误
• 如果ProductName是数字类型字段，去掉单引号即可，保持"[ProductName] = " & Me.Combo202

内容的提问来源于stack exchange，提问作者rohan n