View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
[email protected] kijijijt@gmail.com is offline
external usenet poster
 
Posts: 27
Default 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