Tell Excel or Word to select a printer before printing

This has more to do with the integration between VBA and Lotus Script. How do you tell Excel or Word to select a printer before printing? If this cannot be done, then what about how do I call up a 'Print Preview' instead?

Download this free guide

Download: IT Certifications 101

Inside this exclusive essential guide, our independent experts break down which IT certifications are worth your time and effort, and how to get started obtaining them to further your career— including specific certifications that any cloud or desktop pro should seriously consider.

Start Download

• Corporate E-mail Address:

  You forgot to provide an Email Address.

  This email address doesn’t appear to be valid.

  This email address is already registered. Please login.

  You have exceeded the maximum character limit.

  Please provide a Corporate E-mail Address.

By submitting my Email address I confirm that I have read and accepted the Terms of Use and Declaration of Consent.

By submitting your personal information, you agree that TechTarget and its partners may contact you regarding relevant content, products and special offers.

You also agree that your personal information may be transferred and processed in the United States, and that you have read and agree to the Terms of Use and the Privacy Policy.

I'll try to give you as much info as I can, since this might be useful in general, as well, to others:

The Print verb is a reserved word in OLE, so it can't be directly called, normally. Several applications (such as WordPro) have created "alternative" methods you can call in its place. These verbs, whichever they are, usually only tell the host application to print (with or without displaying the dialog box).

WordPro:
To Change the Printer Name property:

'This example script sets the current document's printer to the HP LaserJet
	'4L, printing to LPT1:.

	.ActiveDocument.PrintManager.PrintDestination = "LPT1:"
	.ActiveDocument.PrintManager.PrinterName = "HP LaserJet 4L"
	.ActiveDocument.PrintManager.UseDefaultPrinter = True
	.ActiveDocument.PrintManager.UpdatePrinterBins
	.ActiveDocument.PrintManager.GetDefaultPageSize
	.ActiveDocument.PrintManager.UpdatePrinterChanges
	.ActiveDocument.PrintOut([From,][To,][Copies,][nodialog])

Microsoft Word:
. .ActiveDocument.PrintOut(Background, Append, Range, OutputFileName, From, To, Item,Copies, Pages, PageType, PrintToFile, Collate, FileName, ActivePrinterMacGX, ManualDuplexPrint)

	'To select the active printer...
	ActivePrinter = "HP LaserJet IIISi on \printerslaser"
	This example makes a local HP LaserJet 4 printer on LPT1 the active printer. 
	ActivePrinter = "HP LaserJet 4 local on LPT1:"

	'To get a print preview from Word:
	.ActiveDocument.PrintPreview

Microsoft Excel:

As you'd expect, the commands are similar (exactly the same except for the parameters in this case) between Excel and Word:

	ActivePrinter
	.PrintOut(From, To, Copies, Preview, ActivePrinter, PrintToFile, Collate)
	PrintPreview

Lotus 123:

	Much like WordPro, but 123 has a lot more options.  Here's the basics:

	Print:
		Application.PrintOut

	Preview:
		Application.Preview

	Printer Name:
		Application.PrinterName

Hope this helps!