(Solved) – Excel Filter to Deselect “0”

  • by
(solved)-–-excel-filter-to-deselect-“0”

I am creating an Excel spreadsheet for inventory management. Every month I will be changing the quantities on-hand and that need to be ordered. I’m writing the macro, and I can only get it to “select” the quantities that exist on the current sheet. In order to get it work properly during the next inventory cycle, I need it to refresh all data, and then apply a filter across 3 different sheets that will Deselect items that have the quantity “0”. Currently, the macro will only select what items are currently in the filter as opposed to deselecting the unwanted quantities.

The current macro looks like:

Sheets("Functional Inventory").Select
ActiveWorkbook.RefreshAll
Sheets("Atlantic Medical Order Sheet").Select
ActiveSheet.Range("$A$3:$C$21").AutoFilter Field:=2, Criteria1:=Array("1"), Operator:=xlFilterValues
Sheets("BG Order Sheet").Select
ActiveSheet.Range("$A$4:$D$212").AutoFilter Field:=2, Criteria1:=Array("1", _
    "2", "30", "4", "5", "60"), Operator:=xlFilterValues
Sheets("Choice Order Form").Select
ActiveSheet.Range("$A$5:$C$12").AutoFilter Field:=2, Criteria1:="1"
Sheets("Atlantic Medical Order Sheet").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
    IgnorePrintAreas:=False
Sheets("BG Order Sheet").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
    IgnorePrintAreas:=False
Sheets("Choice Order Form").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
    IgnorePrintAreas:=FalseAny help would be greatly appreciated!

Leave a Reply

Your email address will not be published. Required fields are marked *