Thread: Autofiltered cells not "Hidden"
View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Mike H. Mike H. is offline
external usenet poster
  
Posts: 471
Default Autofiltered cells not "Hidden"
Someone else came up with this which should work:

Set r = ActiveSheet.UsedRange
nLastRow = r.Rows.Count + r.Row - 1

For i = 1 To nLastRow
If Cells(i, "A").EntireRow.Hidden Then
Else
'perform your task!
End If
Next


Reply With QuoteReply With Quote