Hiding Rows based on the value in column A, starting at row 9

Hi, so i am trying to create a macro which will hide a row if the value in the first column says "REMOVE" for the row in question, this is my code so far

Please Login or Register  to view this content.

The first part unhides everything then hides the rows with the word "REMOVE" in the first column. It is currently not working, any help would be great. Note, i need to run this to the last empty row. When i try to run this i get the "compile error, argument not optional"



Another question, i also need a separate macro assigned to different keys to unhide all cells, regardless of value

Thank you in advance.

4 things:
1. It will use the value "DELETE" not "REMOVE"
2. You shouldn't call Worksheet_Change. Worksheet_Change is meant to activate whenever the worksheet is changed. If you want that, then you don't need the other sub. If you want to activate it manually, then it should be in a normal sub and probably in a normal code module.
3. You shouldn't need to SELECT anything. Selecting is only needed for the user, but VBA can operate on any cells without selecting them first.
4. You have no loop or filter. This code currently only checks the value of A9 and will ignore all values in A10, A11, etc. If you want it to check those values, you'll need to use a loop or filter.

Great, does that solve your issue? Or is there something else you wanted it to do? To selectively hide rows, just put an if statement in the loop.

Try changing "ThisWorkbook.Worksheets(Sheets("AE").Rows(i)).EntireRow.Hidden = True" to "ThisWorkbook.Sheets("AE").Rows(i).EntireRow.Hidden = True"

To assign a shortcut, go to Macros, select your macro, and click Options.