Hopefully a straight forward solution but I can't work out where I'm going wrong;
Any ideas?
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Sheet1.Cells(15, 2) = "" Then
If Sheets("Sheet1").Range("A1").Value = "" Then
Sheets("TEST").Visible = False
Exit Sub
If Sheets("Sheet1").Range("A1").Value = "TEST" Then
Sheets("TEST").Visible = True
End If
End Sub
Any ideas?