"Round Robin" ticket assignment queue

[scottcim]

Hi,
Wondering if anyone has any VBA laying around that can help me build a ticket assignment queue.

I'm trying to create a "round robin" ticket assignment queue that will keep track of tickets assigned to individuals. There needs to have the ability to skip names if their cell is shaded red.

• Press a button to display InputBox to enter ticket number.
• Assign ticket number to the "next in line" name in Column A
• If the "next in line" name cell is filled red, they should be skipped.
• The name assigned the ticket needs to have their cell filled yellow. Only one name should be filled yellow, as they are the last one assigned a ticket.
• The "ticket number" needs to be placed into the adjacent cell in column D, of the "next in line" name. If a ticket already exists in that cell, it should be moved to the next adjacent column. (A persons newest assigned ticket will always be in column D)
• Column B should keep a running total of that names tickets.
• A Msgbox should appear displaying the ticket number and the name it was assigned to.

So, for example below, the next in line ticket should go to Name2. The last assigned was Name16. Name1,3 and 4 should be skipped.

Name	Ticket Count		Ticket numbers
Name1	2		Ticket17	Ticket1
Name2	3		Ticket34	Ticket18	Ticket2
Name3	2		Ticket19	Ticket3
Name4	2		Ticket20	Ticket4
Name5	2		Ticket21	Ticket5
Name6	3		Ticket35	Ticket22	Ticket6
Name7	3		Ticket36	Ticket23	Ticket7
Name8	3		Ticket37	Ticket24	Ticket8
Name9	3		Ticket38	Ticket25	Ticket9
Name10	3		Ticket39	Ticket26	Ticket10
Name11	3		Ticket40	Ticket27	Ticket11
Name12	3		Ticket41	Ticket28	Ticket12
Name13	3		Ticket42	Ticket29	Ticket13
Name14	3		Ticket43	Ticket30	Ticket14
Name15	3		Ticket44	Ticket31	Ticket15
Name16	3		Ticket45	Ticket32	Ticket16

<colgroup><col width="64" style="width: 48pt;"> <col width="84" style="width: 63pt; mso-width-source: userset; mso-width-alt: 3072;"> <col width="35" style="width: 26pt; mso-width-source: userset; mso-width-alt: 1280;"> <col width="103" style="width: 77pt; mso-width-source: userset; mso-width-alt: 3766;"> <col width="77" style="width: 58pt; mso-width-source: userset; mso-width-alt: 2816;"> <col width="78" style="width: 59pt; mso-width-source: userset; mso-width-alt: 2852;"> <tbody> </tbody>

Thank you!
Scott