G
Guest
Here's a little "snip" of code:
Windows("GOTU_Earn_Bal_2001_02 .xls").Activate
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="HDQ"
Selection.SpecialCells(xlCellTypeVisible).Select
Set rngSelection = Range(Range("C2").End(xlUp), Range("C2").End(xlDown))
The first four lines do wxactly what I want them to. Obviously the fifth
line does not. What I want is to go to the top of the visible selection. This
is dealing with about 500 Rows out of 60,000, so for speed and efficiency, I
want to do a For Each intRow through only the visible Rows.
Is there a way to do this?
Windows("GOTU_Earn_Bal_2001_02 .xls").Activate
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="HDQ"
Selection.SpecialCells(xlCellTypeVisible).Select
Set rngSelection = Range(Range("C2").End(xlUp), Range("C2").End(xlDown))
The first four lines do wxactly what I want them to. Obviously the fifth
line does not. What I want is to go to the top of the visible selection. This
is dealing with about 500 Rows out of 60,000, so for speed and efficiency, I
want to do a For Each intRow through only the visible Rows.
Is there a way to do this?