The difficult I do immediately, the impossible takes a little bit longer.

VBA

Loop while renumbering two columns...
This is an oldie but a goody (written in Access 97)...  I need to loop thru a Recordset after the *slides* had been added and make sure there were only 140 slides per tray AND make sure they were in sequential order.  AND I could change the TrayID or the PositionID at any time and still have it reorder...

Once all the Images for the Presentation had been selected all I had to do was click the Reorganize button (above).  If you look at the example (red circle) you will see some changed to *Tray 2* and the PositionID has been adjusted because the limit of 140 slides in *Tray 1* had been reached.

Below is the code behind the Reorganize button, have fun!

aaaaaaaaaaaaiii