Delete Rows with specific criteria

I have a spreadsheet and I want to delete all rows in column H that contains the following, 370, 376, 382, 392. Of if it is easier, I want to only keep rows in column H that contain the following 471, 477, 483 and 493. My spreadsheet is updated daily so I don't have a definitive number of rows. How would something like that be coded with VBA? Thank you

Maybe:

Please Login or Register  to view this content.

Originally Posted by JOHN H. DAVIS

Maybe:

Please Login or Register  to view this content.

Thank you so much for this information. I want to learn through this process so mad I ask you what does the code "end(3).row to 2 Select Case Cells (I," mean and do?

Thank you

End(3).row is a shorter version of End(xlUp).row - it chooses last cell with data, in this case Column H.

Select Case Cells(i,"H").value is a statement which identifies the value of the cell in Column H in the i Loop
Case is = defines which values to consider when using the i Loop

Hope that helps.