Variable rows
Sub AircodeSampleWarning
MyUserinput = Inputbox("Please enter a number")
ActiveCell.Offset(0, 0).Rows("1:" & MyUserInput).EntireRow.Select
End Sub
You may want to consider checking the user input to make sure that it is a
valid entry before executing your selection. If they enter "sfghsg" the code
will error out when trying to select that range.
I could also see the rare but unfortunate instance where a user meant to
type "9" but accidently hits the key twice and deletes 99 rows. Perhaps
consider selecting the rows, then give the user a chance to abort if they
were to hasty and mis-entered their number of rows to delete...
HTH
Keith
"Jwil" wrote:
Hello,
How do I use a variable to select entire rows? I want to ask the user how
many rows they want to select and then use that number to select the rows.
For instance:
ActiveCell.Offset(0, 0).Rows("1:58").EntireRow.Select
selects 58 rows. I would like to replace the '58' with a variable so that I
can choose how many I want to delete.
|