Ending a Loop

Hello, I am working on a macro that takes a selection from a database (the selection is one or more entire rows) and creates and prints a report for each row selected. (It is currently set up to just create a new workbook of the report rather than print it for testing.)To use it, I must have the database (Database.xlsm) open and the sheet "DATABASE" selected. I manually select which row(s) I would like reports for and then run the macro. I am experiencing problems making the loop end. It does not create reports only for the selection, but keeps creating reports until my computer crashes basically. I've tried to use the Excel Help included with the program but I can't figure out what I'm doing wrong. Thank you if you can let me know!

The macro is currently:

Please Login or Register  to view this content.

Thank you very much!

Be sure to read through the Forum Rules so you can use and follow them effectively.

Specifically, you'll need to EDIT that post above and put code tags around that code you used. (Like shown in my signature)

Also, fix the title to reflect the topic only, take out the personalization: "Ending a Loop"

The use of "activecell" is where you're going awry. Once you've set a range, specifically go through those cells without "selecting" or "offsetting".

Try this:

Please Login or Register  to view this content.

I tried your suggestion and somehow the new code did exactly what the old one did? I have included the entire example below:

Please Login or Register  to view this content.

Assuming the data sheet is in pristine condition to start each time, copy that sheet BEFORE you make any changes to it and you won't have to "reset it" each time.

Please Login or Register  to view this content.

I'm doing all I can to stop all the selecting and such, so there's no reason the code should "run wild" unless the other macro (which I took out the call to) was doing more uncontrolled selecting and changing things substantively.


If that doesn't work, post an actual work book so I can see what you're seeing.

You're working much harder than you need to. Here's your sheet with the formulas already in the DATA SHEET template ready and watching row 43 for when you put something there. Then this shorter macro does the job.

Please Login or Register  to view this content.

My apologies. I did indeed only test my macro by selecting a few cells in column A each time.