for next with if
On Thursday, September 1, 2016 at 11:30:13 AM UTC-4, wrote:
Hi,
I would like to filter out blanks in column L on every worksheet except for the one called "Revisions", not sure why this doesn't work:
Sub UnFilterAll()
Dim WS As Worksheet
For Each WS In ThisWorkbook.Worksheets
If Worksheet.Name = "Revisions" Then Next
WS.Cells.AutoFilter 12
Next
End Sub
any help is appreciated..
sorry...this is code to filter blanks
Sub FilterAll()
Dim WS As Worksheet
For Each WS In ThisWorkbook.Worksheets
WS.Cells.AutoFilter 12, "<"
Next
End Sub
|