Can somebody please assist me, I have this code which looks like:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B:L")) Is Nothing Then
On Error Resume Next
Application.EnableEvents = False
If Not Target.HasFormula Then Target.Value =
UCase(Target.Value)
Application.EnableEvents = True
On Error GoTo 0
End If
If Target.Column = 12 Then
If LCase(Target.Value) = "yes" Then
Target.EntireRow.Hidden = True
End If
End If
End Sub

The first part works great were all lower case is changed to upper
case,however If I have the text "YES" in a cell in row 12 then the entire row
must be hidden.
Help please, I do not now anything about VBA, but am willing to learn.

Graham