Monthly Totals

I already do this on a day to day function with this formula

=SUMPRODUCT(--([Main.xls]Sheet1!$C$2:$C$21845="Bill"),--(DATE(YEAR([Main.xls]Sheet1!$B$2:$B$21845),MONTH([Main.xls]Sheet1!$B$2:$B$21845),DAY([Main.xls]Sheet1!$B$2:$B$21845))=B$3),--([Main.xls]Sheet1!$D$2:$D$21845="1"))

So now its time for the end of the month totals. I want to take the total of 1s 2s 3s and so on for All the people in the spreadsheet on the left and put them in on the right. so for example

Bill
1 50
2 42
3 38
ACT 0
Class 1 12
Class 2 5
Class 3 7

but with the actual numbers...Thanks for any help in advance. I have provided the actual sheets to make it alot easier

\1