Copies
This property accesses the copy count parameter associated with a specific Windows printer. If it is not specified, the default is 1 copy.
Group: Printer Extensions
Syntax: Printer.Copies = nValue
nValue (Long) is the number of copies to print.
Example:
Printer.Copies = 10
Note: there is a special condition with the Copies, Orientation and PrintQuality commands. Since the server manages the beginning and ending of a print job, the VBA scripts must not use one of these commands after the Printer.Print command. These 3 commands will start a new print job and all settings defined up to this point will be lost.
This is valid:
Printer.Copies = 10
Printer.Orientation = PrintHorizontal
Printer.Print "Sample Text"
Printer.EndDoc
This is not because the Orientation line will lose the 2 lines above it.
Printer.Copies = 10
Printer.Print "Sample Text"
Printer.Orientation = PrintHorizontal
Printer.EndDoc