ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Macro to Unhide Rows (https://www.excelbanter.com/excel-programming/426808-macro-unhide-rows.html)

RLY

Macro to Unhide Rows
 
Need help with an excel 2003 macro to simply unhide a certain number of rows
in a spreadsheet (# of rows to be unhidden is based on user input).
Here's what I have & it's not working...

With Sheets("Inputs").Select
X = Range("U2")
Y = Range("X2")
Rows("X:Y", 0).Select
Range("Y").Activate
Selection.EntireRow.Hidden = False
End With

U2 is a fixed entry, the row # in X2 is calculated based on a user input (#
of additional rows required).
Thanks, Robert

Jacob Skaria

Macro to Unhide Rows
 
With Sheets("Inputs").Select
x = Range("U2")
Y = Range("X2")
Rows(x & ":" & Y).EntireRow.Hidden = False
Range("A" & Y).Activate
End With

If this post helps click Yes
---------------
Jacob Skaria


"RLY" wrote:

Need help with an excel 2003 macro to simply unhide a certain number of rows
in a spreadsheet (# of rows to be unhidden is based on user input).
Here's what I have & it's not working...

With Sheets("Inputs").Select
X = Range("U2")
Y = Range("X2")
Rows("X:Y", 0).Select
Range("Y").Activate
Selection.EntireRow.Hidden = False
End With

U2 is a fixed entry, the row # in X2 is calculated based on a user input (#
of additional rows required).
Thanks, Robert


Dave Peterson

Macro to Unhide Rows
 
With Sheets("Inputs")
X = .Range("U2").value
Y = .Range("X2").value
.Rows(x & ":" & y).hidden = False
End With


RLY wrote:

Need help with an excel 2003 macro to simply unhide a certain number of rows
in a spreadsheet (# of rows to be unhidden is based on user input).
Here's what I have & it's not working...

With Sheets("Inputs").Select
X = Range("U2")
Y = Range("X2")
Rows("X:Y", 0).Select
Range("Y").Activate
Selection.EntireRow.Hidden = False
End With

U2 is a fixed entry, the row # in X2 is calculated based on a user input (#
of additional rows required).
Thanks, Robert


--

Dave Peterson

RLY

Macro to Unhide Rows
 
That sure works - Thank You!

"Jacob Skaria" wrote:

With Sheets("Inputs").Select
x = Range("U2")
Y = Range("X2")
Rows(x & ":" & Y).EntireRow.Hidden = False
Range("A" & Y).Activate
End With

If this post helps click Yes
---------------
Jacob Skaria


"RLY" wrote:

Need help with an excel 2003 macro to simply unhide a certain number of rows
in a spreadsheet (# of rows to be unhidden is based on user input).
Here's what I have & it's not working...

With Sheets("Inputs").Select
X = Range("U2")
Y = Range("X2")
Rows("X:Y", 0).Select
Range("Y").Activate
Selection.EntireRow.Hidden = False
End With

U2 is a fixed entry, the row # in X2 is calculated based on a user input (#
of additional rows required).
Thanks, Robert


RLY

Macro to Unhide Rows
 
One more issue:
The max # of additional rows that can be unhidden is 16. How can I apply
this limit within the macro (if the user enters "17" an error will occur)...?
Thank You.


"RLY" wrote:

That sure works - Thank You!

"Jacob Skaria" wrote:

With Sheets("Inputs").Select
x = Range("U2")
Y = Range("X2")
Rows(x & ":" & Y).EntireRow.Hidden = False
Range("A" & Y).Activate
End With

If this post helps click Yes
---------------
Jacob Skaria


"RLY" wrote:

Need help with an excel 2003 macro to simply unhide a certain number of rows
in a spreadsheet (# of rows to be unhidden is based on user input).
Here's what I have & it's not working...

With Sheets("Inputs").Select
X = Range("U2")
Y = Range("X2")
Rows("X:Y", 0).Select
Range("Y").Activate
Selection.EntireRow.Hidden = False
End With

U2 is a fixed entry, the row # in X2 is calculated based on a user input (#
of additional rows required).
Thanks, Robert



All times are GMT +1. The time now is 09:19 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com