How to allocate using a loop in macro VBA?

Question

I have a dataset that i would like to perform allocation on, below are the constraints:

1. Each container can only contain 310 pieces
2. We can mix colours,