How to limit "Unhide Rows" Macro?
If I understand your question correctly, I would think something like this
will work...
With Sheets("Inputs").Select
X = Range("U2")
Y = Range("X2")
If Y - X < 16 Then
Rows(X & ":" & Y).Hidden = False
Range("A" & Y).Activate
Else
MsgBox "You specified too many rows to unhide!"
End If
End With
--
Rick (MVP - Excel)
"RLY" wrote in message
...
The "unhide additional rows" macro provided by Jacob works great (below),
but
I need to limit the # of rows affected. The max # of additional rows
available is 16, if the user enters "17" an error will occur. How can I
apply
this limit?
Thank You, Robert
"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
|