To Edit and save an existing Microsoft Word Document using Microsoft Excel, you need to follow the steps below:
Create the object of Microsoft Word
Set objWord = CreateObject(“Word.Application”)
Using MS word object, Open the existing word document by providing the complete path
Set objDoc = objWord.Documents.Open("D:\OpenMe.docx")
Make the MS Word Visible
Create a Selection object with the help of WordObject.
Set objSelection = objWord.Selection
Edit the Word Document using SelectionObject
objSelection.TypeText ("I am new here" & vbCrLf)
Save the Word Document
Complete Code:
Function FnEditAndSaveWordDoc() Dim objWord Dim objDoc Dim objSelection Set objWord = CreateObject("Word.Application") Set objDoc = objWord.Documents.Open("D:\OpenMe.docx") objWord.Visible = True Set objSelection = objWord.Selection objSelection.Font.Bold = True objSelection.Font.Size = "22" objSelection.TypeText ("I am new here" & vbCrLf) objDoc.Save End Function