O
olgaz
Hello,
This is my routine code:
I do not ask to save anything and I close Word:
The program works well and the document can be printed. However, when login
again, on the same computer, and opening Word, all those documents open
automatically under the title recovered.
How can I prevent this from happening each time?
Thank you.
This is my routine code:
Public Sub fmailmerge(myskey As String)
Dim objWord As Word.Document
Dim strMergeDoc, str, str2 As String
Dim mystudy As Variant
Set objWord = GetObject(strMergeDoc, "Word.Document")
objWord.Application.Visible = False
objWord.MailMerge.OpenDataSource
"\\fserver-xp\fshare\Pidu\StudysDocuments\EpiPneumo\Stikers.mdb", , , , True,
, , , , , , "QUERY CasesToday", "Select * from CasesToday where skey = '" &
myskey & "'"
objWord.MailMerge.Destination = wdSendToNewDocument
The important thing is:
objWord.MailMerge.Execute
objWord.Application.Options.PrintBackground = False
objWord.PageSetup.FirstPageTray = wdPrinterAutomaticSheetFeed
objWord.PageSetup.OtherPagesTray = wdPrinterAutomaticSheetFeed
objWord.Application.ActiveDocument.PrintOut
I do not ask to save anything and I close Word:
objWord.Close (wdDoNotSaveChanges)
Set objWord = Nothing
End Sub
The program works well and the document can be printed. However, when login
again, on the same computer, and opening Word, all those documents open
automatically under the title recovered.
How can I prevent this from happening each time?
Thank you.