I have four groups with three teams with different amount of people on the
teams my current code using team 1 as an example is:

Sheets(Array("T1-02", "T1-03", "T1-04", "T1-05", "T1-06", "T1-07",
"T1-08")).Select
Sheets("T1-02").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("Team 1").Select

problem is those who have less get the form with no data. My question is can
I get a message box to enter the number of people on the team and print that?
and how 3 ppl = T1-01 to T1-03, 8 ppl is as you see above. Much thanks
appreciated