Code: Select all
wordApp := ComObject("Word.Application")
document := wordApp.Documents.Open(A_ScriptDir . "\a.docx")
try {
document.Tables[1].Cell[1, 1].Range.Text := "Hello"
} catch Any as e {
MsgBox e.Message . "`n"
. e.What . "`n"
. e.Extra
} finally {
document.Save()
document.Close()
wordApp.Quit()
}