Adding blank rows

Hello All,

I need help writing a macro that will add blank rows based on cell values. I've attached a sample table to show what I mean. I have a list of names and box numbers. While the box numbers are in numerical order, they skip some numbers by design. What I want to do is have a macro that will see when a number is skipped and add a row (or more in some cases) for it. The new rows do not need to have the missing numbers placed in them, just having the blank space is enough.

Thanks


Book1.xlsx

Maybe:

Please Login or Register  to view this content.

John,

Thanks! That worked perfectly. I ran it a couple of times with my actual data and it worked, however, a few times it stopped before cycling though the whole list. I ended up running it twice and it finished. Any thoughts on why it might do that?

You're welcome. I don't know why it stopped, no thoughts on that. Did you receive an error message when it stopped?

No. I did not receive any error message. I'll keep running various tests of differing size today to see what happens.

I've run data through this macro several more times and haven't run into any more issues regarding it stopping early. However, it does seem to keep running well past my data set. Is there a way to tell it to stop after it hits 3000 rows, since my data will never be longer?

Maybe:

Please Login or Register  to view this content.

John - this didn't work. I've tried tweaking it in other ways all to no avail. I'll keep at it though.

It's the same macro that you said was working before? The only thing I change was the count to 3000, as you requested?

I'm not sure what happened, but I copied and pasted it and tried to run it three times, but kept getting 'runtime error 13'. On the fourth time, without changing anything it ran. Thanks for the help. I was hoping that by limiting the range it would run faster, but it still takes a while to process. Oh well, it works and that's what counts.