Ecel VBA编程 高级筛选.docxVIP

创建条件Excel VBA 创建 条件 高级筛选即通过创建的多个复杂的筛选条件，对工作表中的数据进行筛选。本节介绍使用 AdvancedFilter 方法对数据进行筛选。 语法：表达式.AdvancedFilter(Action, CriteriaRange, CopyToRange, Unique) 其中，AdvancedFilter 方法包含多个参数，其功能如下： Action 用于指定是否就地复制或筛选列表。 CriteriaRange 表示条件区域。如果省略该参数，则没有条件限制。 CopyToRange 如果 Action 为 xlFilterCopy，则为复制行的目标区域。否则，忽略该参数。 Unique 如果为 True，则只筛选唯一记录。如果为 False，则筛选符合条件的所有记录（默认值为 False）。 例如，打开“鲜奶配送用户清单”工作簿，在工作簿中的 B37 至 D39 单元格区域，创建如 图 16-7 所示的表格。 图 16-7 创建筛选条件 然后，在 VBE 窗口中，输入以下代码。运行下面的代码，即可筛选出符合条件的结果。 Sub Sub 高级筛选() Range(A2:H35).AdvancedFilter _ Action:=xlFilterInPlace, _ CriteriaRange:=Range(B37:D39) End Sub