Okay, I know the basics of what I want, here, but I can't get it to work. I know how to hide with 1 criteria per column, but not 2 different ones. Here's what DOESN'T work, to give you an idea of what I am working with
Dim Lastrow As Long
Application.ScreenUpdating = False
Lastrow = Cells.Find("*", , , , xlByRows, xlPrevious).Row
With Range("A2:I" & Lastrow)
Selection.AutoFilter
.AutoFilter Field:=6, Criteria1:= _
"=<>Available",
Criteria2:="=<>Reshelving"
End With
Range("A2:A" & Lastrow).EntireRow.Delete
ActiveSheet.AutoFilterMode = False
Application.ScreenUpdating = True
Also fighting with me is
Dim Lastrow As Long
Application.ScreenUpdating = False
Lastrow = Cells.Find("*", , , , xlByRows, xlPrevious).Row
With Range("A2:I" & Lastrow)
Selection.AutoFilter
.AutoFilter Field:=6, Criteria1:= _
"=<>Available", Operator:=xlOr, Criteria2:="=<>Reshelving"
End With
Range("A2:A" & Lastrow).EntireRow.Delete
ActiveSheet.AutoFilterMode = False
Application.ScreenUpdating = True
As the above, which seems like it should work, is instead hiding EVERYTHING.
I'm so confused and know just enough about VB to be dangerous. Help? (And many thanks!)
Bookmarks