if msgbox no then Popup checkbox with multiple selections

[liwi2]

Hi All,
I am stuck on that one and hope someone will be able to help me out here.
I have 2 workbooks
- "sourcewks" - list of employees in col A
- "destwks" - list of jobs where employees are assigned ( either 2 or 3 employees in col B,C or D every 9 rows starting from 10th). Below is sample table of 2 first jobs out of 12

[TABLE="class: grid, width: 500, align: center"]
<tbody>[TR]
[TD][/TD]
[TD]A[/TD]
[TD]B[/TD]
[TD]C[/TD]
[TD]D[/TD]
[/TR]
[TR]
[TD]1
[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]2[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]3[/TD]
[TD]Job[/TD]
[TD]1[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]4[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]5[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]6[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]7[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]8[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]9[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]10[/TD]
[TD]Employee[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]11[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]12[/TD]
[TD]Job[/TD]
[TD]2[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]13[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]14[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]15[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]16[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]17[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]18[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]19[/TD]
[TD]Employee[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]


I have already the part where if option of 2 employees is selected and now I need popup checkbox "UserForm1" for user to select which job out of 12 they want to assign 3 employees to. I have already created the checkbox but no idea what next
Once these jobs are selected I need code to paste 3 employees in these jobs and in all others 2 employees.
Here is part of my code:

....
answer = MsgBox("Do you want to use 2 people for all jobs?", vbYesNo + vbQuestion)
If answer = vbYes Then
lngRowCounter = 1
n = 10
sourcewks.Activate
Do While helpwks.Cells(lngRowCounter, 1).Value <> ""
sourcewks.Range("A" & lngRowCounter).Copy
destwks.Range("B" & n).PasteSpecial Transpose:=True
lngRowCounter = lngRowCounter2 + 1
sourcewks.Range("A" & lngRowCounter).Copy
destwks.Range.Range("C" & n).PasteSpecial Transpose:=True
lngRowCounter = lngRowCounter + 1
n = n + 9
Loop


Else


UserForm1.Show


...

I can't figure out how to do it or find anything online.
I will be grateful for your help.

Many thanks in advance