.DataBodyRange issue - Sorting loop suddenly stops with no errors

I have some code that is supposed to move data from one table to another while sorting them. So a row is added to Table2 and it's supposed to look for another row that meets the criteria and then add that row. It runs and just stops without error halfway through. I noticed the last row it usually stops on usually contains the header info from table1. But I can't figure out how to implement ".DataBodyRange" to prevent this.

The full code:
I will also attach what I'm working on for visual reference.

Please Login or Register  to view this content.

Hi there,

Your logic is quite difficult to follow.

Please Login or Register  to view this content.

should this read:

Please Login or Register  to view this content.

Also:

Please Login or Register  to view this content.

lastRowTbl2 is defined at the start of the routine and does not increase as rows are added to the table - is this intentional?

Regards,

Greg M

Originally Posted by Greg M

Hi there,

Your logic is quite difficult to follow.

Please Login or Register  to view this content.

should this read:

Please Login or Register  to view this content.

Also:

Please Login or Register  to view this content.

lastRowTbl2 is defined at the start of the routine and does not increase as rows are added to the table - is this intentional?

Regards,

Greg M

Yeah, I'll admit coming back to VBA after VB & C# is not like riding a bicycle.

The goal is to put a row from table1 into table2, then find a row from table1 where each column from E through AU has to remain under 30.06 when added together. If it goes over it'll skip to the next. When it finds one it'll insert it into table2. Then it will look for a row in table1 that compares to only the last inserted row in table2 2.

The purpose is columns E through AU are actually times, and I am wanting to prevent putting two units (rows) on the assembly line that will go over 30.06 minutes in any station (columns). Those that will cause this will be identified and the manufacturing process will be evaluated.

Hi there,

Let's see if I've understood your requirements correctly.

Take a look at the attached version of your workbook and see if it does what you need. It uses the following code:

Please Login or Register  to view this content.

The highlighted values may be altered to suit your requirements.


Hope this helps - please let me know how you get on.

Regards,

Greg M