# Need help with a Word 2003 Macro

**URL:** <https://boards.straightdope.com/t/need-help-with-a-word-2003-macro/449388>\
**Category:** Miscellaneous and Personal Stuff I Must Share\
**Created:** [May 15, 2008, 3:17am UTC](https://boards.straightdope.com/t/need-help-with-a-word-2003-macro/449388 "2008-05-15T03:17:02Z")\
**Posts on this page:** 2\
**Page:** 1

<div class="post-metadata">

**Author:** ![MannyL](https://avatars.discourse-cdn.com/v4/letter/m/ba8739/32.png) [@MannyL](https://boards.straightdope.com/u/MannyL)\
**Post date:** [May 15, 2008, 3:17am UTC](https://boards.straightdope.com/t/need-help-with-a-word-2003-macro/449388/1 "2008-05-15T03:17:02Z")

</div>

I have two printers that I print to. One is a laser printer that I am only using for envelopes at the moment and one is an inkjet printer I’m using for documents.

They are both on the network

\dellsvr2003e\HP Deskjet D1300 series on NE06: is the Inkjet one and  
\192.168.3.3\KONICA MINOLTA PagePro 1350W on NE05 is the laser.

I need to figure out how to write a maco that will switch the printer to the PagePro when I go to print an envelope then switch it back after.

Any suggestions?

---

<div class="post-metadata">

**Author:** ![Morbo](https://sea3.discourse-cdn.com/straightdope/user_avatar/boards.straightdope.com/morbo/32/389_2.png) [@Morbo](https://boards.straightdope.com/u/Morbo)\
**Post date:** [May 15, 2008, 3:58am UTC](https://boards.straightdope.com/t/need-help-with-a-word-2003-macro/449388/2 "2008-05-15T03:58:42Z")

</div>

How about

Dim docObj As Word.Document  
Set docObj = ThisDocument  
ActiveDocument.Printer = “\dellsvr2003e\HP Deskjet D1300 series on NE060”

- above syntax in quotes has to be exact; you may have to tweak it to make the driver happy

Assign that macro to a toolbar button, then change the syntax to another printer in another macro and assign that one to another macro toolbar button. Click whichever toolbar button you want for each printer. You can even add text that identifies each printer to the toolbar buttons. This has the benefit to assigning them to Normal.dot so they’ll always be there whenever you relaunch Word.

Or, if you always use the other printer as the default, just create one macro and assign it to the other printer you only use for envelopes.