VBA：取消篩選(Autofilter、AdvancedFilter )

執行c_3 副程式即取消篩選狀態

Sub C_3() '篩選與復原

  Dim ws As Worksheet

    Set ws = ThisWorkbook.ActiveSheet

    With ws

        If .FilterMode Then

            .ShowAllData

        End If

    End With

    Set ws = Nothing

End Sub