高级在Excel中过滤VBA，使用OR

我尝试在VBA中对Excel 2013进行高级筛选。 由于某些特定的原因，我不想使用Excel表格。

我创build了两行标题（第48行），其中一行标准为多行（A49：Q55），另一行标题（第56行）为数据行。

当我尝试使用filter来使用OR条件，所以我想过滤这两个值从数据范围，我把数据放在一个单元格下面的标准范围下面的第二行这个单元格中的数据比我只接收数据只对应于头下面的第一个单元格。 什么事情出错了？

Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A49:Q55")) Is Nothing Then On Error Resume Next ActiveSheet.ShowAllData Range("A56").CurrentRegion.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range("A48").CurrentRegion End If End Sub