Printing

J

Joel

Hello,

My script prints with this code:

Sub CommandButtonShipLabel_Click()
Dim objDoc
Set objDoc =
GetWordDocShipLabel("\\tgps8\drawing$\Jobs\Task_Templates\Ship.dot")
Call FillFieldsShipLabel(objDoc)
objDoc.Application.Options.PrintBackground = True
objDoc.PrintOut
objDoc.Close wdDoNotSaveChanges
Call RestoreWordShipLabel
Set objDoc = Nothing
End Sub

How can I make it print to a specific printer and print 2 copies?

Thanks for your help.

-Joel
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Printing With Code 2
print PDF 1
populating excel file from custom form 1
Printing in Word from Outlook custom forms 4
CustomDocumentProperties causes Type Mismatch Error 1
Print A For (docm), Send Email Attachment And Close For Without Saving 2
Problem Prining word document from Access 3
Copying the "Link to Record" from an Appointment to a Task 0

Top