hi all,

some help with the code below, what i need it to do is when a cell is selected (so when you click once on it) it unhides a hidden sheet and takes you to a certain range. It does not seem to work. Also this code will be placed into 12 sheets.

It appears that what ever cell i click it unhides the hidden sheet and stops the macro.

Thanks
Paul

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("B11").Select Then
Sheet3.Visible = True
Sheet3.Activate
Range("B2").Select
Else
End If
If Range("B12").Select Then
Sheet3.Visible = True
Sheet3.Activate
Range("D2").Select
Else
End If
If Range("B13").Select Then
Sheet3.Visible = True
Sheet3.Activate
Range("D2").Select
End If
End Sub