VBA-Excel. How can I handle hide/unhide rows based on Private Sub Worksheet_Change(ByVal Target As Range)?

[Jmuniz_Vargas]

Good morning to all,

I am a newbie in macros & VBA Excel. I wish to handle hide/unhide rows based on Private Sub Worksheet_Change(ByVal Target As Range). I have the following code event

Private Sub Worksheet_Change(ByVal Target As Range)​

ActiveSheet.Unprotect Password:="avalon"​

If Target.Column = 2 Then​

Application.EnableEvents = False​

Cells(Target.Row, 5).Value = Date + Time​

Application.EnableEvents = True​

End If​

ActiveSheet.Protect Password:="avalon"​

End Sub​

The idea is to aggregate this event (hide/unhide rows) when I entry data from 'B4'to 'B21' (Sometimes they will be filled totally and sometimes partially. It does not matter). Maybe, clicking in 'B21'or another event using double click in certain cell to activate unhide rows from 22 to 36 for follow up fill those rows. I hope to be clear, if not let me know to try to clarify my need to discover the proper code based on events.

Thanks in advance. I promise to learn quickly.

 

[bellman101]

Hi,

are you saying that when you change the value in a cell in the range B4:B21, you would like to hide or unhide a row in the range 22:36?

To hide rows you can use:

Range("B22").rowheight = 0
'OR
Range("B22").entirerow.hidden = True

And to unnhide them:

Range("B22").rowheight = 15 ' This is the default height.  Adjust the number as required.
'OR
Range("B22").entirerow.hidden = False

Hope that get you on your way.

Cheers
JB

 

[Jmuniz_Vargas]

Thank you very much, bellman101 . I will follow as you suggest. Great day and happy weekend!

 

[bellman101]

Good luck. If that's not what you need, come back with a screen shot

 

[Jmuniz_Vargas]

great. thanks, again.