For Each Cell in Range (by only visible range)

[JFulford84]

Anyone able to explain this?

For Each r in Sheets("BLAH").Range("A1:A1000")

This works great for what I'm using it for. However, this still hits each cell even when they are filtered out.

What would be the correct way to only go through each visible cell in a given range?

 

[pgc01]

Hi

Try:

For Each r In Sheets("BLAH").Range("A1:A1000").SpecialCells(xlCellTypeVisible)