Outlook 2003 and Macro

[Johny]

Hello,

I am trying to get a printing icon in outlook which allows me to print to
another printer other than the 'default' printer.

I managed to do this with Word using the following Macro:

Sub staffColour()
Dim sCurrentPrinter As String
sCurrentPrinter = ActivePrinter
ActivePrinter = "//server_machine/colour printer"
Application.PrintOut FileName:=""
ActivePrinter = sCurrentPrinter
End Sub


My problem is that the command << Application.PrintOut FileName:="" >> does
not work in Outlook.

Anyone knows which commands will print in Outlook?

Thanks a lot,

Johny

 

[Sue Mosher [MVP-Outlook]]

Outlook has no similar programmability. Change default printers before you do the Outlook printing from your program.

FYI, there is a newsgroup specifically for general Outlook programming issues "down the hall" at microsoft.public.outlook.program_vba or, via web interface, at http://www.microsoft.com/office/community/en-us/default.mspx?dg=microsoft.public.outlook.program_vba


--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003

and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers