For i = 1 To num_copies
'Print the document here... Printer.NewPage Next i Printer.EndDoc When you print a document with TrueType fonts, the system downloads the fonts to the printer. That can take a long time. You can make printing multiple copies faster by printing all of the copies within one printer document. |