Microsoft Word 基本操作

‘绑定 Microsoft Word
Dim oWord As Object ‘Microsoft Word Application 本身
Call BindWord(True)
Dim oDocument As Object ‘Microsoft Word 多文档之一

‘打开并绑定文件 D:/Test.rtf
Set oDocument = oWord.Application.Documents.Open(“D:/Test.rtf”)

‘绑定已经打开文件 Demo.doc
Set oDocument = oWord.Documents.Item(“Demo.doc”)

‘新建文件并绑定
Set oDocument = oWord.Documents.Add

‘绑定已经打开的当前文件
Set oDocument = oWord.ActiveDocument

‘另存文件并指定格式
oDocument.SaveAs “D:/TestBack”, FileFormat:=6 ‘RTF Format

‘退出 Microsoft Word 并释放资源
oWord.Quit
Set oWord = Nothing
Set oDocument = Nothing