Bin Packing Problem

[Guido Geurs]

Attached are some flowcharts of the code.

[Guido Geurs]

This is a version working on the same principle but with the indexes of the ARRSEL array.
Maybe a little faster with large sheets

[jfarr3ll]

That's perfect. Thank you so much for this.

[jfarr3ll]

Hi Guido,

Last year you were increadibly helpful with this problem, and I was hoping you could provide some of your expertise again to help with a slight issue I've identified when using your code in practise.

It is perfect as long as a multiple of 4 is not entered. However, when a multiple of 4 is entered it seems to ignore one record.

Alternatively if anyone else can help I'd greatly appreciate it.

I have attached a workbook.

Many Thanks in advance,

[Guido Geurs]

Sorry, my mistake.
For the last records there is an error in the code.
There is 2 times "Case 3" so If there are 4 records left, the 4th will never be seen.
It must be:

.....
                Case 3
                    .INDEX3 = ARRSELidx
                [B]Case 4[/B]
                    .INDEX4 = ARRSELidx
                End Select
            End With
.....

[jfarr3ll]

perfect.

Thanks again Guido.