ms-access - Access 过滤器 VBA

Question

我正在尝试在 vba 中使用这样的过滤器:

Private Sub Form_Load()

    Me.Filter = "[Alvo] = " & AlvoAtual  
    Me.FilterOn = True  
    Me.Requery  

End Sub

其中 AlvoAtual 是全局变量，但什么也没发生。当我将 AlvoAtual 更改为特定值时，也不会发生任何事情。像这样:

Private Sub Form_Load()

     Me.Filter = "[Alvo] = 'AAAA'"
     Me.FilterOn = True
     Me.Requery

End Sub

有人知道问题吗？

我采用这个问题 (VBAWhatnow) 是希望得到回答，而不是像我一样重复 advised .

除了局部变量之外，我正在尝试做同样的事情。

当我手动定义值时，我的过滤器工作正常，但是当我引入变量时，过滤器不再工作

Forms![frmPendingActions]![qryPendingAction subform].Form.Filter = "Filterby = FilterCrit"

谁能帮我找到一个好的解决方案？

Answer 1

您(VBAWhatnow)说“当我手动定义值时，我的过滤器工作正常，但是当我引入变量时，过滤器不再起作用”。

然后在您的过滤器分配中...

.Filter = "Filterby = FilterCrit"

所以我假设 FilterCrit是局部变量的名称。如果这是真的，请使用变量的值而不是其名称构建过滤器表达式。

如 Filterby是数字字段类型...

.Filter = "Filterby = " & FilterCrit

如 Filterby是文本字段类型...

.Filter = "Filterby = """ & FilterCrit & """"

如果这些变化都不适合您，请向我们提供有关 Filterby 的更多信息。和 FilterCrit .