【问题标题】:Dynamic Table Filtering Gives Error 1004动态表过滤给出错误 1004
【发布时间】:2018-12-26 14:25:50
【问题描述】:

我遵循了一个非常简单的表格 VBA 动态过滤教程 - 但我没有 VBA 经验,无法弄清楚为什么我会收到错误 1004 - 应用程序定义或对象定义错误。

作为参考,我的活动工作表中有一个名为“AcronymList”的表

我的VBA过滤器代码如下:

Private Sub TextBox1_Change()
'Filter acronyms in AcronymList Table.
ActiveSheet.ListObjects("AcronymList").Range.AutoFilter Field:=1, Criteria:="*" & [A3] & "*", Operator:=xlFilterValues
End Sub

每当我从 A3 ActiveX 文本框中添加/删除文本时,都会发生错误。

感谢任何指点。

【问题讨论】:

  • xlfiltervalues 用于提供过滤器值数组时。您没有这样做,因此请删除 operator 参数。
  • 嗨,Rory,我按照您的建议删除了 Operator 参数,并且收到了同样的错误。
  • Criteria1:=,不是Criteria
  • 嗨 BigBen,请回答。这非常简单。

标签: excel vba filtering


【解决方案1】:

只是一个小错字:Criteria1:=... 而不是 Criteria:=... 详情请参阅Range.AutoFilter 方法。

请注意,您不应使用 @Rory 在 cmets 中提到的 Operator 参数。

【讨论】:

  • 感谢 BigBen,这完全让我无法理解。这是一个相当尴尬的小疏忽!
猜你喜欢
  • 2020-10-08
  • 2013-04-02
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 2014-04-13
  • 2017-09-30
  • 2014-12-17
  • 2012-04-23
相关资源
最近更新 更多