VBA AutoFilter gibt Laufzeitfehler 1004 aus

Question

Kann mir jemand helfen, den Fehler in der Autofilterzeile unten zu finden? Es tritt der Laufzeitfehler „1004“ auf.

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

Answer 1

Dieser Fehler bedeutet, dass sich nichts innerhalb oder „in der Nähe“ der Zelle befindetA1im aktiven Blatt.