filtro

Hola, Llen !

... macro ... Autofilter ... accesar al primer elemento de los resultados que me da el filtro [...]

considerando que las filas [de los elementos] que NO 'cumplen' el criterio del filtro [realmente] se 'ocultan'...
... y tomando en cuenta que los titulos SON [tambien] 'parte' del rango con el filtro
el siguiente ejemplo 'busca' la primer fila 'visible' [a partir de la fila 2]
==Sub Primer_Celda_Filtrada()
If Not ActiveSheet.FilterMode Then Exit Sub
Dim Fila As Long, Fila_n As Long
With ActiveSheet.AutoFilter.Range
Fila_n = .Rows.Count
For Fila = 2 To Fila_n
If .Cells(Fila, 1).Height > 0 Then
MsgBox "Primer elemento ""filtrado"": " & .Cells(Fila, 1).Address
Exit For
End If
Next
End With
End Sub

Saludos,
Héctor.