Hello all,

I have an annoying problem.

MyPrinter = ActivePrinter
ActivePrinter = "FilePrinter on FILE:"
strFileName = Left(ActiveDocument.AttachedTemplate,
Len(ActiveDocument.AttachedTemplate) - 4)
strFileType = ".prn"
strDocNames = "C:\Temp\" & strFileName  & strFileType
Application.PrintOut Background:=False, Append:=False,
Range:=wdPrintAllDocument, OutputFileName:=strDocNames,
Item:=wdPrintDocumentContent, Copies:=1, Pages:="",
PageType:=wdPrintAllPages, Collate:=True
ActivePrinter = MyPrinter

The next time I want to print a document with the File -> Print dialog
(no macro this time), then the Print to file checkbox is still on. And
there seems to be no way to switch it off elegantly. I tried this:

With Dialogs(wdDialogFilePrint)
    .printtofile =0
    .Execute
End With

which results in printing the document (which I don't want...I just
want a .prn file, no "real" print)

I tried

With Dialogs(wdDialogFilePrint)
    .printtofile =0
    .Update
End With

which doesn't uncheck the check box. Actually I tried pretty much
everything that I could come up with. Closing Word is not an option.
While browsing I found several posts on this matter...alas all without
a viable solution.

I'd be really grateful for any suggestions.

TIA

Raph.