Hide rows based on a condition

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have very little expierence with writing VB and what I would like to do is
based on a condition in cell "A1" being Y hide rows 15 - 20. "A2" hide rows
25 - 30 else do nothing.

Any help would be greatly appreciated.

Kim
 
try

If UCase(Range("a1")) = "Y" Then Rows("10:15").Hidden = True
If UCase(Range("a2")) = "Y" Then Rows("25:30").Hidden = True
 
Hi KimberlyH

You can test this event in the sheet module

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Range("A1:A2"), Target) Is Nothing Then
Rows("15:30").Hidden = False
If LCase(Range("A1").Value) = "y" Then Rows("15:20").Hidden = True
If LCase(Range("A2").Value) = "y" Then Rows("25:30").Hidden = True
End If
End Sub
 
Back
Top