You will have to workout how to tell the printer which tray to print from,
but for the rest of it, I would just copy the data from Excel into a Word
document, which you should save with the name datadoc.doc for the purposes
of the following macro.  Also save the two page document as doccopy.doc  (if
you use different names, change the macro accordingly)  In the following
macro, you will also need to specify the path to these documents in place of
C:\[folder].  Now, I am assuming that there is a header row in the data and
that the first room number is in the second row of the table.  Then the
following macro should do what you want (except for printing the documents
for different sources.

You will find some information on controlling the printer at

http://pubs.logicalexpressions.com/Pub0009/LPMArticle.asp?ID=101

Dim datadoc As Document, divdoc As Document, doccopy As Document, datatable
As Table
Dim i As Long, j As Long
Dim room As Range, copies As Range
'Open the document that contains the roomnumbers and number of copies
Set datadoc = Documents.Open("C:\[folder]\datadoc.doc")
'Open the document of which multiple copies are required
Set doccopy = Documents.Open("C:\[folder]\doccopy.doc")
Set datatable = datadoc.Tables(1)
For i = 2 To datatable.Rows.Count
   room = datatable.Cell(i, 1).Range
   room.End = room.End - 1
   copies = datatable.Cell(i, 2).Range
   copies.End = copies.End - 1
   Set divdoc = Documents.Add
   With divdoc
       .Range.InsertAfter room & vbTab & copies
       .PrintOut
       .Close wdDoNotSaveChanges
   End With
   doccopy.PrintOut copies:=copies
Next i