excel 宏 筛选 条件

VBA

按住ALT+F11组合键，打开Visual Basic编辑器。在编辑器中，插入一个模块并复制粘贴以下代码：VBASub 多个条件筛选()Range("A2:C65536").ClearContentsSheets("表一").Range("A1:G16").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range("E1:F3"), CopyToRange:=Range("表二!A1:C1"), Unique:=FalseEnd Sub这个代码实现了对excel中特定范围进行高级筛选，并将结果保存到另一个工作表中。下面是解释：- 使用Sheets("表一").Range("A1:G16")来确定查找范围。- 使用CriteriaRange:=Range("E1:F3")表示查询条件，其中包含字段名称。- 使用CopyToRange:=Range("表二!A1:C1")来指定结果保存范围，也包括字段名称。通过录制宏操作并根据需要修改代码，可以实现多个条件的筛选功能。请注意：以上代码略作修改，以适应不同需求。