VBA AutoFilter genera el error de tiempo de ejecución 1004

Question

¿Alguien podría ayudarme a encontrar lo que está mal en la línea de autofiltro a continuación? Da el error de tiempo de ejecución '1004'.

Sub filter()
    Dim rng_source As Range
    Set rng_source = ActiveSheet.Range("a1").CurrentRegion
    rng_source.AutoFilter
End Sub

Answer 1

Este error significa que no hay nada dentro o "cerca" de la celdaA1en la hoja activa.