If the cells will either be blank or contain an X then

Sub HideRows1()
Worksheets("Jul").Unprotect Password:="abcd"

' Hide Selected Rows on the Worksheet
With Range("B11:B119")
.EntireRow.Hidden = False
On Error Resume Next
.SpecialCells(xlConstants,xlTextValues).EntireRow. Hidden = True
On Error goto 0
End With
Range("C11").Select
Worksheets("Aug").Protect Password:="abcd", Scenarios:=True

End Sub


--
Regards,
Tom Ogilvy


"Ruan" wrote in message
...
Hello,

I would like to hide an entire row, only if the User selects a "X" in
Column
B.

Below is the code I used to hide rows that had blank values in Column B.
How
would I modify this code to look for a "X" value?

Sub HideRows1()
Worksheets("Jul").Unprotect Password:="abcd"

' Hide Selected Rows on the Worksheet
With Range("B11:B119")
.EntireRow.Hidden = False
.SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True
End With
Range("C11").Select
Worksheets("Aug").Protect Password:="abcd", Scenarios:=True

End Sub


Thanks
Ruan