T4061_Hide Rows Using AutoFilter By Two Criteria

https://excel-egy.com/forum/t4061
---------------------------------

Sub Hide_Rows_Using_AutoFilter_By_Two_Criteria()
    Application.ScreenUpdating = False
        With ActiveSheet
            .AutoFilterMode = False
            With .Range("A2:O" & .Cells(Rows.Count, 1).End(xlUp).Row)
                .AutoFilter 15, "<>0", xlAnd, "<>"
            End With
        End With
    Application.ScreenUpdating = True
End Sub