VBA自动取消筛选所有工作表中的ODBC查询表

我试图在运行宏之前取消筛选所有工作表，但这不适用于来自ODBC的表。这只适用于带过滤器的常规工作表

有人能帮忙吗

Sub UnfilterWS()
    Dim xWs As Worksheet
    For Each Wks In ThisWorkbook.Worksheets
    On Error Resume Next
    If Wks.AutoFilterMode Then
        Wks.AutoFilterMode = False
    End If
    Next Wks
End Sub

使用：

...
For Each Wks In ThisWorkbook.Worksheets
    Wks.ShowAllData
Next Wks
...