#16
|
||||
|
||||
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"
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
Tags |
save as, suppress |
Thread Tools | |
Display Modes | |
|
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 |