Distribute names randomly

Hello forum experts
My request is direct and simple ...
I have names in column A and there are three places where I need to distribute those people to according to column C

Simply I need to distribute those names in random way ( no duplicate random is allowed .. I mean if the person is chosen before not to include him again) ..
The distribution would depend on column C
As in the sample : place1 would include 9 persons and place2 would include 4 and place3 would include 7 persons
Thanks advanced for help

Note :I need to deal with the issue using arrays or dictionary method if possible

Thanks a lot for reply
I need the solution using vba arrays not formula arrays .. no need for sorting results ..
I would manually ran it using form button
Thanks advanced for help

Hi,

Here's one solution. First remove the merged cells at J6

Please Login or Register  to view this content.

@Mr. Richard
That's great solution. Thanks a lot for wonderful help
Just note that places are not fixed .. there will be over 100 places

@Mr. karedog the king of vba arrays
Thank you very much for great and awesome code
Just a little addition : to put the places (which would be variable) in first row F1:H1
Please just point me to changes that I should do ..

Thank you very much Mr. Karedog
Now it is perfect .. you are very very helpful

Mr. Kenneth thanks a lot for the code
I tested it and it works well but the results are not correct exactly as the names should be distributed randomly (all the names .. and each name is just distributed once)

Thanks a lot Mr. Kenneth for reply
This is a snap shot of results after testing your code in post #8
The colored cells are duplicate names and that is not allowed ..
Untitled.png


@Mr. Karedog
It seems that I need some modifications to your great and awesome code
I need to deal with each part in a separated array ..because they may be non-adjacent as attached
I mean to store Names in an array, Places in an array, Number of places in an array then to deal with them ..
I am so sorry for modifying my request

Thanks Mr. Karedog for this wonderful code
That's exactly what I need .. Thank you very very much
Best Regards

Thanks a lot Mr. Kenneth for this wonderful help
I tested the last post and it is very excellent ...
Thank you very much for time spent in this issue

In fact I am fond of excel vba and I am learning each day new things .. but may be because of English in not my native language .. this may be an obstacle a little
And this is happened with you as you didn't get my request clearly from the beginning..
Generally I am trying to do my best .. and as for the issues : some of them related to my work and others for my friends that working in various fileds

@Mr. Karedog
As for the last line of the fantastic code

Please Login or Register  to view this content.

I know this may get you angry as this is a new request
As for the results .. In need to put each place with the names in a sheet ..
According to the sample : there are three places so I need to create three worksheets and put the results with the header in each sheet in cell B7
for example : after creating the three sheets : the first sheet would be named after (i.e Place1) and put the related results in B7
and the same steps for the two other sheets
Thanks advanced

Note: If you are annoyed of the last request .. you may stop and don't offer more help .. as I am very embarrassed from you

Thank you very much for reply ..
Here's a sample workbook : Sheets Place1 / Palce2 / Place3 are the expected results (They would be created .. not existing)

That's fascinating .. awesome .. wonderful
Thanks a lot for all great and incredible help (really incredible solutions)
You are UNIQUE ..
Best Regards