code to insert rows and add total - inserts rows, but doesn't add

This code is supposed to it finds in from each cell as long as each cell is the same, then look for other cells

The end result is supposed to look like this:

CH01
100 2
101 2
CH01 Total $200


But I get this:


CH01
100 2
101 2
CH01 Total

And it runs only once, when it is supposed to go through all data (CH01, H02, CH03, DA01, etc...) in all rows up to row 17

Any ideas?

Please Login or Register  to view this content.

Please read the forum rules, and then edit your post to add code tags.

Thank you.

Comment out turning off screen updating and step through the code to see what happens.

So, you have a loop, you step through it, and figure out why it doesn't continue.

Post a workbook with the code that demonstrates the failure.