Hello,

I am looking to be able to double click on a cell to activate opening another sheet (in the same workbook).

So far I have this code

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, Range("B4")) Is Nothing Then
Else
Sheet2.Activate
End If
End Sub


Which works fine for double clicking on Cell B4, then opens Sheet 2.

How do i add multiple conditions to this in the same Sub so I can open more sheets?

i.e. double clicking
B4 = Sheet2.Activate
B5 = Sheet3.Activate
B6 = Sheet4.Activate
B7 = Sheet5.Activate

and so on..

Any help would be greatly appreciated I am struggling to figure this one out.
Thanks