Filtro transparente de Excel VBA

' Clear all filters of the sheet
ThisWorkbook.Worksheets("Sheet1").ShowAllData

' Clear filter for a single column
ThisWorkbook.Worksheets("Sheet1").Range("A3:D1000").AutoFilter Field:=2
VasteMonde