Try this below code... It assumes that I named the cell that has the
dropdown list as "DropDown" and that I named the 5 cells that a user could
hyperlink to as "Spot1", "Spot2", etc... You don't have to name the cells, I
just did it for ease of code writing. I also named the worksheet as WS which
refers to the worksheet HyperlinkTest. You would need to put this code in
the Worksheet Change section of the appropriate worksheet through the VBA
editor. You will also have to create a dropdownl list with the appropriate
values.
Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
Dim WS As Worksheet
Set WS = ThisWorkbook.Worksheets("HyperlinkTest")
If Target.Address = WS.Range("DropDown").Address Then
Select Case WS.Range("DropDown").Value
Case "Spot1"
WS.Range("Spot1").Activate
Case "Spot2"
WS.Range("Spot2").Activate
Case "Spot3"
WS.Range("Spot3").Activate
Case "Spot4"
WS.Range("Spot4").Activate
Case "Spot5"
WS.Range("Spot5").Activate
End Select
End If
Application.ScreenUpdating = True
End Sub
Hope this helps.
Thanks,
Bill Horton