如何筛选Excel两列中任意一列包含负值的行？

下面是两种无需中间步骤的解决办法：

方法1：VBA自动筛选（无手动添加列） #

用VBA动态创建高级筛选的条件区域，执行后自动清理，避免手动操作：

Sub FilterAnyNegative()
    Dim tbl As ListObject
    Dim criteriaRange As Range
    
    ' 指定目标表格
    Set tbl = ActiveSheet.ListObjects("TRANSACTION_LOG_TABLE")
    
    ' 清除已有筛选
    If tbl.AutoFilter.FilterMode Then tbl.AutoFilter.ShowAllData
    
    ' 在表格上方插入临时条件行
    tbl.Range.Rows(1).Insert
    Set criteriaRange = tbl.Range.Offset(-1).Resize(3)
    
    ' 写入“或”逻辑的筛选条件：Column1<0 或 Column2<0
    criteriaRange.Cells(1, tbl.ListColumns("Column1").Index) = "Column1"
    criteriaRange.Cells(2, tbl.ListColumns("Column1").Index) = "<0"
    criteriaRange.Cells(3, tbl.ListColumns("Column2").Index) = "<0"
    
    ' 执行高级筛选
    tbl.Range.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=criteriaRange
    
    ' 删除临时条件区域
    criteriaRange.Rows(1).Delete
End Sub

方法2：手动高级筛选（无需VBA） #

不用代码的话，手动设置高级筛选的“或”条件：

• 在表格外空白区域（比如A1:C3），第一行对应列名位置分别输入“Column1”和“Column2”；
• 第二行“Column1”下方写“<0”，第三行“Column2”下方写“<0”（条件不在同一行即为“或”逻辑）；
• 选中数据区域，点击【数据】→【高级】；
• 选择“在原有区域显示筛选结果”，指定条件区域为刚才的A1:C3，点击确定即可。

关于你之前的VBA代码问题 #

你之前的代码是先筛选Column1<0，再叠加筛选Column2<0，这是“与”逻辑，所以只会保留两列都有负数的行。要实现“或”逻辑，不能分两次设置单列筛选，必须用高级筛选的多条件布局，或者上述VBA方法。

内容的提问来源于stack exchange，提问作者BigRed