para Hector Miguel

hola, Jhorbam !

...he probado tu ejemplo y aunq funciona aun no trabaja correctamente para mi
...es decir el tuyo devuelve un valor...es correcto, pero no el indicado para mi...
Tu ejemplo no me retorna A7890... sino $AU$1
...como... obtener exactamente el valor de la celda...para este caso A7890...

seria necesario conocer 'como' haces el filtrado por vba -?-
ya que de acuerdo con tu consulta anterior, la propuesta fue basada en 'supuestos' :))
por si las dudas... copio/pego la conversacion anterior

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

=

... debo programarle una macro...es una sabana inmensa de datos... lo mas sencillo seria filtrar las celdas con VBA
pero al hacerlo la primera celda de resultado por ejemplo no seria la A1 sino la A7890
como podria identificar la celda a traves de VBA, como en el caso anteriormente expuesto?...

'asumiendo' que 'A1' seria celda correspondiente a los titulos de la columna [por lo que no es 'de interes'] -?-
y que la macro que aplica los autofiltros ya la tienes definida -?-
el siguiente ejemplo te indica la celda donde aparece el primer valor que coincide con el criterio de los autfiltros:

Sub Filtrado_1()
With ActiveSheet
If Not .AutoFilterMode Then MsgBox "No hay rango con autofiltro !!!": Exit Sub
With .AutoFilter.Range.SpecialCells(xlCellTypeVisible)
If Not .Parent.FilterMode Then MsgBox "Filtros no activos !!!": Exit Sub
If .Areas(1).Rows.Count > 1 _
Then MsgBox "Primer valor en... " & .Areas(1).Cells(2, 1).Address _
Else MsgBox "Primer valor en... " & .Areas(2).Cells(1, 1).Address
End With
End With
End Sub