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:

Excel Facts

Format cells as time
Select range and press Ctrl+Shift+2 to format cells as time. (Shift 2 is the @ sign).

Forum statistics

Threads
1,226,739
Messages
6,192,739
Members
453,754
Latest member
milestogo

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top