Unhide rows when selecting a cell

[Molden]

Hi,

does anyone know how to unhide a row when you click on a specific cell, for example if i click cell b20 i would like to unhide rows 20:24 and if possible if i double click it then for it to be hidden again

Thanks

 

[Andrew Poulsom]

Sorry, but how would you be able to click B20 if rows 20:24 are hidden?

 

[Molden]

.

sorry i meant hide rows 21:24

Thanks

 

[Andrew Poulsom]

Put this in the module for the Worksheet:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address <> "$B$20" Then Exit Sub
    Rows("21:24").Hidden = True
End Sub

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Address <> "$B$20" Then Exit Sub
    Rows("21:24").Hidden = False
End Sub

 

[Molden]

.

Thanks

Works great