Conditional Hide Cell Rows

[jimmisavage]

Hi can anyone please help me?

Cell C4 has a dropdown box with 4 options in the lis - All, Reports, Training and Meetings

Range C6:C30 has 'All' information
Range C6:C10 has 'Reports' information
Range C11:C20 has 'Training' information
Range C21:C30 has 'Meetings' information

I would like a macro (or formula if possible) to hide rows based on the option that is selected in the dropdown. Or show the cell range based on the dropdown, whichever is easier!

Many thanks in advance
Jimmi

[FDibbins]

You can hide cell contents using Conditional Formatting. Set the font color to be the same as the background color, that renders it "invisible"

[jimmisavage]

Thanks FDibbins but I would then be left with blank cells on my worksheet. This is not really what I'm looking for

[6StringJazzer]

Then what do you mean by "hide cells"? You can hide rows, and you can hide columns, but you can't hide individual cells.

[jimmisavage]

You are correct - I mean hide the rows which contain the cells with the information in. I have edited my post so it makes sense now

[JOHN H. DAVIS]

Maybe:

Private Sub Worksheet_Change(ByVal Target As Range)
Range("A1:A" & ActiveSheet.UsedRange.Rows.count).EntireRow.Hidden = False
If Not Intersect(Target, Range("C4")) Is Nothing Then
    Select Case Target.Value
        Case Is = "All"
            Rows("6:30").Hidden = False
        Case Is = "Reports"
            Rows("11:30").Hidden = True
        Case Is = "Training"
            Rows("21:30").Hidden = True
            Rows("6:11").Hidden = True
        Case Is = "Meetings"
            Rows("6:20").Hidden = True
    End Select
End If
End Sub

[jimmisavage]

Fantastic! Thanks a lot John H. Davis

[JOHN H. DAVIS]

You're welcome. Glad to help out and thanks for the feedback. Please compy with Post#8.

[6StringJazzer]

If your question has been answered please mark your thread as "Solved" so that members will know that your problem is solved.

Go to the menu immediately above your first post to the thread and click on Thread Tools. From the dropdown menu select "Mark this thread as solved..."