Use this code to turn off the AutoFilter drop-downs: : AutoFilter « Excel « VBA / Excel / Access / Word VBA / Excel / Access / Word Excel AutoFilter Use this code to turn off the AutoFilter drop-downs:
Sub TurnOffAutoFilter()
Worksheets("Sheet1" ).Select
On Error Resume Next
x = ActiveSheet.autoFilter.range.Areas.count
If Err.Number = 0 Then
ActiveSheet.range("A1" ).autoFilter
End If
On Error Resume Next
End Sub
Related examples in the same category 1. The AutoFilter object only exists when the AutoFilter feature is turned on. You can determine whether the Worksheet AutoFilter is active by using the value of the AutoFilterMode property 2. To switch off a range AutoFilter, you use the AutoFilter method of the Range object with no parameters: 3. To ensure that the worksheet AutoFilter is turned off 4. determine whether a ListObject object AutoFilter is turned on or off by testing its ShowAutoFilter property. 5. There is a Filters collection associated with the AutoFilter object that holds a Filter object for each field in the AutoFilter 6. turn on/off the AutoFilter drop-downs: 7. turns off the drop-downs for Columns C, E, F, G, and H: 8. filters to show records 9. To clear the filter from the customer colum 10. filter a column to one of two customers, joined by the OR operator: 11. returns all customers that started with the letters A through E: 12. produces the top 10 revenue records: 13. Selecting Multiple Values from a Filter 14. Selecting a Dynamic Date Range Using AutoFilters 15. Filtering Based on Color or Icon 16. To find records that have no conditional formatting icon, use an operator of xlFilterNoIcon and do not specify any criteria. 17. To find records that have a particular fill color, use an operator of xlFilterCellColor and specify a particular RGB value as the criteria. 18. To find records that have no fill color, use an operator of xlFilterNoFill and do not specify any criteria. 19. To find records that have a particular font color, use an operator of xlFilterFontColor and specify a particular RGB value as the criteria. 20. The fastest way to delete rows is provided by Excel's AutoFilter feature: