高級過濾器不起作用

Question

爲什麼不能使用此代碼？ 列「A」填充了FALSE或TRUE。 b2包含FILTER b3包含TRUE

Sub FAST_hide_rows() 
Range("a1:a153804").AdvancedFilter Action:=xlFilterInPlace,CriteriaRange:=Range("b2:b3"), Unique:=False 
End Sub 

該代碼找到所有記錄但不隱藏它們。它應該隱藏所有的FALSE行。它在一張紙上工作，但不在另一張上。

任何想法？

Answer 1

它在一張紙上工作，但不在另一張紙上。

你需要告訴宏它應該與其他明智的工作，它將工作在ActiveSheet。

試試這個：

Sub FAST_hide_rows() 
Dim WS As Worksheet 
Set WS = Sheet1  'Change it with your sheet number 

WS.Range("a1:a153804").AdvancedFilter Action:=xlFilterInPlace,CriteriaRange:=WS.Range("b2:b3"), Unique:=False 

End Sub