Excel VBA and WORD question

mattmickle

Board Regular
Joined
Nov 17, 2010
Messages
81
Code:
Sub wordopen()

Dim objWord
Set objWord = CreateObject("Word.Application")
Dim objDoc
Set objDoc = objWord.Documents.Open("C:\HR-Benefits\Enrollment\LifeInsurance-CoreAndSupplemental.docx")




objDoc.PrintOut




objDoc.Close
objWord.Quit


End Sub

I wrote the above code and it works. From an excel spreadsheet, it opens Word and prints the document. But, my company has set our default print to black and white. Is there a way to code the printer preferences for Word, in excel VBA?

Thanks for all your help.
 
Last edited:

Some videos you may like

Excel Facts

How to total the visible cells?
From the first blank cell below a filtered data set, press Alt+=. Instead of SUM, you will get SUBTOTAL(9,)

Watch MrExcel Video

Forum statistics

Threads
1,109,464
Messages
5,528,957
Members
409,848
Latest member
Blomsten
Top