I have a spreadsheet that contains job titles.
When a staff member is selected their job titles are displayed vertically in cells A89:A92.
Each job title is related to a hidden worksheet with the job description on it. I want to open these hidden sheets when that job title is displayed in cells A89:A92.

I have this pieces of code which will work when searching one cell example "A89". How can I modify the code to work on all the cells. When I make the range A89:A92 the code no longer seems to work. 

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
    Select Case Worksheets("Career Development").Range("A89").Value
    Case "Team Leader"
        Worksheets("Career Development").Visible = True
        Worksheets("Lists").Visible = False
        Worksheets("Team Leader").Visible = True
        Worksheets("Level 3 Engineer").Visible = False
    Case "Level 3 Engineer"
        Worksheets("Career Development").Visible = True
        Worksheets("Lists").Visible = False
        Worksheets("Team Leader").Visible = False
        Worksheets("Level 3 Engineer").Visible = True
   
    End Select
End Sub