Message Box to find specific row then delete all others

[mccrimmon]

Hi

I am wondering if anyone can help

Im looking to have a messagebox on my macro that takes me to a specific row as a result of the row entered in the messagebox.

I then want it to delete all data before this row and all data after this row in order to only leave the row that was specified as a result of the messagebox.

Thanks

[mudraker]

Try this

It Exits
if a number is entered
A decimal number is entered
A 0 or value greater than the number or rows on the sheet

Please Login or Register  to view this content.

[mccrimmon]

Thanks for this.

Have you got an example of what I would enter in the message box?

I want to keep Row 94 for example, however, when I enter 94 or A94 in the messagebox, nothing appears to happen?

Thanks again
Much appreciated

[mudraker]

It worked when I tested using low numbers like 4 & 5
I did not test using higher numbers so did not pickup that I needed to convert the number entered in the message box from a string value to a numeric value

Try this version

The macro will only run if whole numeric numbers are entered
e.g
5
95
266

Please Login or Register  to view this content.