Unhide Macro

[Michelle]

I am attempting to unhide only a few rows. For example I
have rows 50:125 hidden. I did a search to find out what
row the information that I need is contained (62), I want
to be able to unhide just that row, not all of 50:125.

Is there such a macro?

Thanks again.



Hi Michelle

Do you mean this
Rows("10:20").Hidden = False


--
Regards Ron de Bruin
http://www.rondebruin.nl

I have a worksheet with multiple rows hidden, however, I
do not want to unhide all rows, just a few at a time.

Is there a way to write a Macro that unhides only a
certain nymber of rows at a time?

Thanks

Michelle.

..

 

[jeff]

Hi,

Paste this macro in. It'll unhide the row you
request only.

HTH.
jeff

Sub unhide()
X = InputBox("Enter row to unhide")
If X = "" Then Exit Sub
Application.ScreenUpdating = False
Rows("15:125").Select
Selection.EntireRow.Hidden = True
Rows(X).Select
Selection.EntireRow.Hidden = False
Rows("15:" & Val(X) - 1).Select
Selection.EntireRow.Hidden = True
Rows(Val(X) + 1 & ":125").Select
Selection.EntireRow.Hidden = True
Application.ScreenUpdating = True
End Sub