VBA - Clear Autofilter settings from only specific columns

[pliskers]

I have a worksheet with a table and slicers that filter on geographical criteria. There are some macros that also filter the numerical fields. I would like the selection of any of the macros to clear the filter selections from the numerical columns (11-34), but leave the filters intact on the geographical columns (1-10).

I initially used the ShowAllData command but then realized it was clearing the geographical selections as well.

How can I clear only the filtering selections in columns 11-34?

Many thanks in advance!

 

[DanteAmor]

How about:

Sub Macro1()
  Dim i As Long
  Application.ScreenUpdating = False
  For i = 11 To 34
    ActiveSheet.Range("A:AH").AutoFilter Field:=i
  Next
End Sub

 

[rlv01]

Very similar to DanteAmor's solution:

Sub ConceptForPartialClear()
    Dim FilterRange As Range
    Dim I As Long
   
    With ActiveSheet
        'Assume Filter Range is 100 rows x 34 columns.
        'Assume all colums in this range have data and are filtered
        Set FilterRange = .Range("A1").Resize(100, 34)
        Debug.Print FilterRange.Address
       
        If .AutoFilterMode Then
            For I = 1 To 34
                Select Case I
                    Case 11 To 34
                        'Clear filter
                        FilterRange.AutoFilter Field:=I 'clear filter in single column
                End Select
            Next I
        End If
    End With
End Sub