VBA Express
Solved: Microsoft Office Document Image Writer (Office 2003) [Archive] - VBA Express Forum

PDA

View Full Version : Solved: Microsoft Office Document Image Writer (Office 2003)



mdmackillop
07-17-2005, 03:29 AM
A new application to me.
I can send a file to print to the image writer by VBA. Can I automate the saving to avoid the dialog box which appears?
I've played around with PDF995 which does similar printing, which requires manipluation of an INI file but this programme is not available to me in another workplace.

xCav8r
07-17-2005, 04:54 AM
Tried this? http://msdn.microsoft.com/library/default.asp?url=/library/en-us/Mspauto/html/dimthPrintOut_HV01040596.asp

mdmackillop
07-17-2005, 05:24 AM
Thanks for that :cloud9:
Excel
Sub Macro1()
Application.ActivePrinter = "Microsoft Office Document Image Writer on Ne01:"
ActiveSheet.PrintOut PrToFileName:="C:\Atest1.mdi"
End Sub

Word
Sub Macro1()
ActivePrinter = "Microsoft Office Document Image Writer"
Application.PrintOut OutputFileName:="C:\Atest2.mdi"
End Sub

mosca25
11-04-2005, 01:46 PM
i am trying to do the same thing but in access. i can't find how to do it anywhere
can anyone help

thanks



Thanks for that :cloud9:
Excel
Sub Macro1()
Application.ActivePrinter = "Microsoft Office Document Image Writer on Ne01:"
ActiveSheet.PrintOut PrToFileName:="C:\Atest1.mdi"
End Sub

Word
Sub Macro1()
ActivePrinter = "Microsoft Office Document Image Writer"
Application.PrintOut OutputFileName:="C:\Atest2.mdi"
End Sub

mdmackillop
11-06-2005, 10:09 AM
Hi Mosca,
I did once find a utility to change printers in access, which seems to be a pig of a thing to do. I butchered the code for my own purposes, but I'll see if I can find the original. It might be worth asking about changing active printer in the Access forum, as there may be a better (simpler) way to do it.
Regards
MD

Have a look here http://www.mvps.org/access/reports/rpt0009.htm

mosca25
11-28-2005, 08:32 AM
i am able to change the printer and print to the adobe printer. however i can't put a file name when it asks for it
thanks
:dunno

andrew93
12-22-2005, 03:10 AM
Hi

I recently did exactly the same thing involving creating a pdf document and resetting the default printer in Access - the story of how I did it is in this thread :
http://www.vbaexpress.com/forum/showthread.php?t=6210

But be aware that I did modify the code slightly to accomodate what I was doing - especially the parts with the unique_ID and entity_ID although there is a link to the original code.

HTH, Andrew