Hi,

I am filtering my data, based on user input.  But I need a way to reset
the filters, here is some example code.  Say I filter by one, then
reset the data by using Spreadsheet1.ActiveSheet.ShowAllData  then they
try to filter by "2".  Problem is that it includes "1" and "2".  How
can I fix this?

Thanks

   With Me.Spreadsheet1.ActiveWorkbook.ActiveSheet
       Set owcAutoFilter = .autoFilter
       With owcAutoFilter
           With .Filters(1).Criteria
               .FilterFunction = ssFilterFunctionInclude
               .Add "1"
           End With
       .Apply
       End With
       Set owcAutoFilter = Nothing
   End With