Numbers in cells not recognized when using InputBox to copy and paste rows

Greetings,

I have code to cut-and-paste rows to another sheet based on the value in the first column matching the InputBox entry. It was adapted from code that searched for a word in the first column, and if I change what I have below to "Dim Number as String" and change the InputBox data type to 2, it works perfectly for words. Unfortunately, I need it to look for a number in the first column, but it doesn't seem to see the numbers (either in number, general, or text format). I need it to do two things:

1) Copy and paste the rows beginning with the number (the number that's in column A of Sheet1) entered in the InputBox onto Sheet2, and only take the rows beginning with that exact number (in other words, only the row beginning with, say, 2 - not 22, 12, 122, etc.).

2) Delete whatever was in Sheet2 from the previous query before pasting the new set of rows.

Thank you in advance for your assistance; my code is as follows:

Please Login or Register  to view this content.

Nikolette

Thanks so much, Dave - it works beautifully! The only trouble I'm having is that it pulls over everything that contains the number I've entered - for example, if I enter "3", it copies and pastes the rows that start with "3" and the rows that have 3 in them, such as "39", "43", etc. Is there a way to make it pull the rows with exactly the number entered (not simply containing the number entered)?

Dave: My mistake - you are correct; it pulls over all numbers that start with that number (43 was a bad example). The only thing in the cell in column A is a number, currently anything from 1 to 250 (there will be more entries in the future).

JapanDave: Thanks! The problem of it pulling over rows starting with the exact number (only 3, for ex., instead of 3, 39, and 3-whatever) is solved :-)

I've added in the line to delete the contents of Sheet2 and it works like a charm - thank you so much to both of you for your help!

Thank you, Dave - I appreciate it greatly!