View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.misc
Tyro[_2_] Tyro[_2_] is offline
external usenet poster
 
Posts: 1,091
Default code to hide hides too much

Correction: The "WS" in the code should be "Web System"

Tyro

"Tyro" wrote in message
...
You're checking only for a change in Column C. There is no reference to
row 7. Your code should look something like this:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 And Target.Row = 7 Then
If Target.Value = "WS" Then
Columns("E:F").Hidden = False
Else
Columns("E:F").Hidden = True
End If
End If
End Sub

Tyro