Как при включенном автофильтре определить количество полей.

[Rust]

Задача заключается в том, чтобы отключить критерии автофильтра.
Как в этом коде определить кол-во ячеек с установленным автофильтром.
Sub Макрос1()
Dim CountFields
' CountFields = ???
For i = 1 To CountFields
Sheets(1).Cells.AutoFilter Field:=i
Next
End Sub

[KL]

Код: Выделить всё

Sub test()
    Sheets(1).ShowAllData
End Sub

[KL]

Но если надо знать кол-во столбцов, то...

Код: Выделить всё

Sub test2()
    MsgBox Sheets(1).AutoFilter.Range.Columns.Count
End Sub