Reset All Auto Filters for All Worksheets

For example:

Sub ShowAll()
    Dim wks As Worksheet
    For Each wks In ActiveWorkbook.Worksheets
        With wks
            If .AutoFilterMode Then
                If .FilterMode Then .ShowAllData
            End If
        End With
    Next wks
End Sub