Allocate workload / Rotate Start Point / Equal workload

Hi
The attached worksheet will assign an employee to each shipment based on an assigned average of the total available work for a day. The sheet will also use the entry count column which adds a difficulty component when its above 1 which is also used when assigning the work evenly. Column F & G are linked by formulas to the Employee sheet that will be used by a team lead to assign a name and either manually assign a percentage or allow the Employees sheet to calculate and average % for each employee.
The included macro code does work generally, but there are a few items that I am stuck on
The "Dim i As Long, allocated As Long, jobCount As Long" may leave unassigned jobs based on the daily count
The additional line i added and indented changing allocated as double "Dim i As Long, allocated As Double, jobCount As Long" will assign all jobs, but the last employee typically falls short based on the available work.

Question1: Is there a better way to calculate the workload to always assign every job and even out the work load
Question2: Based on the differing workload counts , there may not be a better way to assign work and I should stay with the allocated as Double to always assign every job. If so can this macro start assigning the work at Employee 1 (cellF5) and alternate to the next employee each time the macro is run and end at Employee 10 and then start over. This would create an averaged workload over a 10 day period.
I am open for suggestions

Please Login or Register  to view this content.