Allocate values from multiple cells and distribute (divide) to multiple cells almost equally

[pin3kodu]

The idea is that allocating the values from different cells and distributions spesific cells intelligently.

Here is the operations:
First find the maksimum valued 2 "TAKERS" from the column H (blue colored)
Distribute the numbers almost equally and integer to the "TAKERS"
Each "GİVER" sends different number of colors to "TAKERS" almost equally
Manuel distribution is attached.

Which VBA codes solves this problem?
Thanks =)

 

[KRice]

Can a Giver split their items and send a portion to Taker1 and the remainder to Taker2? For example, if GiverA has 5 reds, could 3 reds be given to Taker1 and 2 reds be given to Taker2?