Mega Code Archive

 

Categories / VisualBasic Script / Word

 

To save a document with a new name, use the SaveAs method

Sub Main()     Dim wdApp As Word.Application     Set wdApp = GetObject(, "Word.Application")     wdApp.ActiveDocument.SaveAs "C:\MemoTest.docx" End Sub