Need automatic macro that makes 4 sheets disappear if a sheet outside of those 4 is select

Hi all..

I have done this before with one sheet, where I use the deactivate command in the code for that sheet, if that sheet is deselected then it disappears...

Private Sub Worksheet_Deactivate()

 ThisWorkbook.Sheets("Instructions").Visible = False
End Sub

What I want to know know, is if I select a sheet other than sheet1, sheet2, sheet3 and sheet4, than those 4 all become hidden.

Thanks,