彩色滤光片引起错误

Question

宏的这一部分（第一步）导致

  

运行时错误9（下标超出范围）

第一次尝试

，但是当我再次按debug和F8键时我可以正常继续，但我不知道为什么。

请注意可能的原因：启用宏的这一部分后，已经过滤了另一列。

   ActiveSheet.ListObjects("Table1").Range.AutoFilter Field:=2, Criteria1:=RGB _
    (146, 208, 80), Operator:=xlFilterCellColor