Hide Rows based on Cell Value

[helpexcel]

Hi - I have a drop down in A3 on sheet1 that lets you pick 1-3. if you pick 1: rows 10-30 hidden, 2: rows 20-30 are hidden, 3: no rows hidden. Thanks!

 

[lrobbo314]

Try this...

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A3")) Is Nothing Then
    Application.ScreenUpdating = False
    Rows.Hidden = False
    Select Case Target.Value
        Case 1
            Range("10:30").EntireRow.Hidden = True
        Case 2
            Range("20:30").EntireRow.Hidden = True
    End Select
    Application.ScreenUpdating = True
End If
End Sub