Hi, if the user double clicks in the cell you could use something like
this to take them to that sheet (assuming that the sheets are named
after the cities; place this in the sheet module):
Public Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range,
Cancel As Boolean)
Dim C$
Cancel = True
C = Target.Address(False, False)
If C = "B11" Then
Worksheets("Atlanta").Select
ElseIf C = "B12" Then
Worksheets("Philadelphia").Select
ElseIf C = "B14" Then
Worksheets("Jacksonville").Select
ElseIf C = "B16" Then
Worksheets("Miami").Select
ElseIf C = "B17" Then
Worksheets("Montgomery").Select
ElseIf C = "B18" Then
Worksheets("Columbus").Select
ElseIf C = "B23" Then
Worksheets("Indianapolis").Select
End If
End Sub


HTH--Lonnie M.