Visual Basic para Aplicaciones - Salto de fila con filtro aplicado en excel

Que tal!!

Espero puedan ayudarme porque he buscado en varios lados y no encuentro cómo.

Tengo una datos en una hoja de excel con filtros aplicados...

Necesito recorrer fila por fila para hacer ciertas validaciones a cada registro, pero solo los visibles.

Generalmente cuando recorro las filas utilizo un for de 1 a N donde N es el numero de la última fila y voy recogiendo los datos de cad fila con Cells(fila,columna).Value pero esto no reconoce el filtro aplicado. Siempre se va por todas las filas.

¿Cómo puedo resolver mi problema?

De antemano gracias.

A ver si esto puede ayudarte...

Sub test()
Dim f As Filter
Dim w As Worksheet
Dim rng As Range, cell As Range
On Error Resume Next

Set w = Worksheets("Hoja1")
If w.AutoFilter Is Nothing Then GoTo fin

For Each f In w.AutoFilter.Filters
Set rng = w.AutoFilter.Range
If f.On Then
For Each cell In rng
If Not cell.EntireRow.Hidden Then
MsgBox cell.Address
End If
Next
End If
Next

fin:
Set rng = Nothing
Set cell = Nothing
End Sub

Saludos desde Baires, JuanC