Hide - Unhide

[Evremonde]

Hello All:

Looking for some VBA to do the following:

I am routinely hiding and unhiding rows 5 through 15 on a number of worksheets in one workbook. Would like some code that when run would hide the rows if unhidden -THEN- unhide the rows if hidden. Will assign to a button thereafter. Thank you kindly for the assistance...

e~

 

[JoeMo]

Possibly something like this?

Sub HideAndUnhiide()
Dim R As Range
Set R = ActiveSheet.Rows("5:15")
R.Hidden = Not R.Hidden
End Sub

 

[Evremonde]

Possibly something like this?

Sub HideAndUnhiide()
Dim R As Range
Set R = ActiveSheet.Rows("5:15")
R.Hidden = Not R.Hidden
End Sub

Possibly something like this?

Sub HideAndUnhiide()
Dim R As Range
Set R = ActiveSheet.Rows("5:15")
R.Hidden = Not R.Hidden
End Sub

Perfect. Thank you...

 

[JoeMo]

Perfect. Thank you...

You are welcome - thanks for the reply.