VBA 自动过滤出现运行时错误 1004

Question

有人能帮我找出下面自动过滤器行中的问题吗？它给出运行时错误“1004”。

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

Answer 1

此错误意味着单元格内或“附近”没有任何内容A1在活动工作表中。