How to suppress saveas dialog from VB6

macropod · #16 05-09-2014, 07:01 AM

I can't test the way you describe, because I have both Word 2003 & Word 2010 installed on my system and automation starts Word 2003. However, the following should resolve the issue:

Code:

Dim WW
Dim FileName
Dim SaveFormat
SaveFormat = 0
FileName = "C:\tmp\sample."
FileCopy FileName & "doc", FileName & "rtf"
Set WW = CreateObject("Word.Application")
WW.Visible = True
WW.Documents.Open FileName & "rtf"
Call WW.ActiveDocument.SaveAs(FileName & "doc", SaveFormat)
WW.ActiveDocument.Close False
Kill FileName & "rtf"

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Disabling Word's Save and SaveAs commands	Catty	Word VBA	6	03-19-2014 03:21 AM
Saveas error handling	jillapass	Word VBA	7	03-30-2012 03:24 PM
saveAs ChDir _	tinfanide	Excel Programming	4	11-05-2011 01:40 AM
Suppress Dialog Box	crutch024	Word	0	08-17-2010 09:52 AM
Suppress "do you want to save?" dialog on close	rnstewart	Excel	2	12-28-2005 04:30 PM