; Connect to the Word program already opened
Word := ComObjCreate("Word.Application")
Word.Visible := True
file := "C:\Users\User\Desktop\WordFile.docx" ; Path to existing file
Word.Documents.Open(file) ; Open the file
; Save the Document with "Save As"
file2 := "C:\Users\User\Desktop\WordFile-2.docx" ; Path where the new file will be saved
Word.ActiveDocument.SaveAs(file2)