Loop through rows and generate new records

Sorry for not complying to the rules - were not aware of this. :-)

Have now read the rules and will comply to this going forward.

Thanks for notifying me.

Hi JessPedersenSCM and welcome to ExcelForum,

Try the attached file with the code also in this post. I think I misunderstood the colors, because my numbers match your numbers, but one of my colors seems to be incorrect.

Lewis

Please Login or Register  to view this content.

Fantastic!! :-)

This is really awesome - thank you so much for the help!

Actually the color coding in my example was not correct - it was actually row No. 4 in the example which caused the issue, since it has to be yellow instead of green.

But luckily I was able to change a few lines of code which made it work - actually the Inventory/Reorder position which is now calculated after the color coding settings.

But I could not have done it without the complete solution which you provided - thank you, it is truly appreciated.

Please Login or Register  to view this content.

Just a follow-up question.

I am actually a bit unsure what the TraverseInventoryList() does? Is it just to give the overall result in the VBA immediate window for debugging / search reasons?

I'm glad everything worked out for you, especially since you were able to make changes yourself.

I am actually a bit unsure what the TraverseInventoryList() does? Is it just to give the overall result in the VBA immediate window for debugging / search reasons?

Yes. The 'Immediate Window' is a great tool for debugging.

Since it seems like you are new to VBA, it is for demonstration purposes, to show how I would read a list of data. Step one in my solution to your problem, was being able to read your data. I thought it might be helpful to you in the future.

Here a few debugger tips which may also be helpful to you in the future:
a. Press 'F8' to single step (goes into subroutines and functions).
b. Press SHIFT 'F8' to single step OVER subroutines and functions.
c. Press CTRL 'F8' to stop at the line where the cursor is.
d. 'Left Click' the margin to the left of a line to set (or clear) a BREAKPOINT.
e. Press CTRL 'G' to open the IMMEDIATE WINDOW. 'debug.print' statements send their
output to the IMMEDIATE WINDOW.
f. Select View > Locals to see all variables while debugging.
g. To automatically set a BREAKPOINT at a certain location put in the line:
'Debug.Assert False'
h. To conditionally set a BREAKPOINT at a certain location put in lines similar to:
if i >= 20 and xTV20 > 99.56 then
Debug.Assert False
endif
i. A variable value will be displayed by putting the cursor over the variable name.

Lewis