unfiltered - 如何使用 VBA 取消过滤除第一列之外的所有过滤器。例如：在 A1:W1000 范围内。取消过滤除 A 列之外的所有列

Question

如何使用 VBA 取消过滤除第一列之外的所有过滤器。例如：在 A1:W1000 范围内。取消过滤除 A 列之外的所有列。

Sub ClearAllexceptColumnA() ' ActiveSheet.Range("$B$2:$BOV$1953").ShowAllData End Sub