《VBA之Word应用》（版权10178982），是我推出第八套教程，教程是专门讲解VBA在Word中的应用，围绕“面向对象编程”讲解，首先让大家认识Word中VBA的对象，以及对象的属性、方法，然后通过实例让大家感受到Word VBA 的妙处。
这套教程是专门针对WORD VBA 的教程，是VBA中的稀缺资源，我给这套教程分归为中级教程，希望大家在VBA入门后再学习这套教程，这样会更加深入的理解面向对象编程的意义。
本套教程共三册十六章，今日内容为：VBA之Word应用第三章第二节:从指定的目录中打开Word文档
【分享成果，随喜正能量】一个人内心没有涵养，就会变成色厉内荏，表面满不在乎，而内心非常空虚。其实，大可不必。一个人好就是好，穷就是穷，痛苦就是痛苦。。
第三章 文档集合Documents对象及文档Document对象
大家好，我们继续Word VBA的讲解。这讲开始，我们进入非常重要一章的学习，文档集合Documents对象及文档Document对象。在前面的讲解中我们可以大概看出文档和文档集合在Word VBA中的作用，很多的对象都是文档对象属性的返回对象，我们通过这章的学习要掌握Word VBA的基本应用。
第二节 文档集合Documents 对象（二）
大家好，我们继续文档集合对象的讲解，在上一节中，我们讲了文档集合对象的Count属性和Add方法，Item方法，及Save方法。这节中我们继续讲解Documents 对象的其他方法。
1方法
这个方法会打开指定的文档并将其添加到 Documents 集合。返回一个 Document 对象。
语法：
expression.Open(FileName,ConfirmConversions,ReadOnly,AddToRecentFiles, PasswordDocument,PasswordTemplate,Revert,WritePasswordDocument,WritePasswordTemplate,Format,Encoding,Visible,OpenConflictDocument,OpenAndRepair, DocumentDirection,NoEncodingDialog)
其中expression为一个文档对象集合对象.
参数：
1）FileName 必需 Variant 文档名（可包含路径）
2）ConfirmConversions 可选Variant 如果文件不是 Microsoft Word 格式，则为 True 以显示"转换文件"对话框
3）ReadOnly 可选 Variant 为 True，则以只读方式打开文档。
4）AddToRecentFiles 可选 Variant 如果为true将文件名添加到最近使用的文件列表菜单的底部。
5) PasswordDocument 可选 Variant 打开文档时所需的密码。
6) PasswordTemplate 可选 Variant 打开模板时所需的密码
7) Revert 可选 Variant 控制如果FileName 是打开文档的名称会进行什么操作。 为 True，则放弃对打开文档的任何未保存更改并重新打开文件。为False则激活打开的文档。
8) WritePasswordDocument 可选Variant用于保存文档更改的密码
9) WritePasswordTemplate 可选Variant 用于保存模板更改的密码。
10) Format 可选 Variant 用于打开文档的文件转换器。可为以下WdOpenFormat常量之一。默认值为wdOpenFormatAuto。若要指定外部文件格式，请将OpenFormat属性应用于 FileConverter对象，以确定要与此参数一起使用的值。
11) Encoding 可选Variant 当你查看保存的文档时 Microsoft Word 所使用的文档编码（代码页或字符集）。可以是任何有效的 MsoEncoding 常量。默认值是系统代码页。
12) Visible 可选Variant 如果在可见窗口中打开文档使用TTRUE。默认值为True。13) OpenConflictDocument 可选Variant 指定是否打开具有脱机冲突的文档的冲突文件。
14) OpenAndRepair 可选 Variant 如果该属性为
15) DocumentDirection 可选WdDocumentDirection类型，表示文档中的横排文字。默认值为
16）NoEncodingDialog 可选Variant 如果为True，当无法识别文本编码，则跳过显示
2 Documents.Close 方法
关闭指定的文档。
语法：expression.Close (SaveChanges, OriginalFormat, RouteDocument
其中expression为一个文档对象集合对象.
参数：
1）SaveChanges 可选 Variant 指定保存文档的操作。可以是下列的
2）OriginalFormat 可选 Variant 指定保存文档的格式。可以是下列的
3）RouteDocument 可选 Variant True 将文档传送给下一个收件人。如果文档没有附加的传送名单，则忽略此参数。
3 实例：从指定的目录中打开Word文档
下面我们利用OPEN方法来打开一个指定目录下的文档，我们看下面的代码：
Sub mynzA()
Dim myFile As String
示例03.docx"
If Dir(myFile) <> "" Then
Documents.Open myFile
Else
不存在！"
End If
End Sub
代码截图：
代码的解读：
1） Dim myFile As String 定义一个字符串，作为文件名变量
2） myFile = ThisDocument.Path & "\" & "示例03.docx" 指定这个变量，包括文件的路径.
3） If Dir(myFile) <> "" Then 首先判断这个文件是否存在
4） Documents.Open myFile 如果这个文件存在，利用OPEN方法打开这个文件。
5） MsgBox myFile & "不存在！" 如果文件不存在则弹出一个对话框将提示反馈给用户
代码的执行效果（略）
今日内容回向：
1 文档集合的OPEN意义是什么？
2 文档集合的CLOSE的意义是什么？
3 如何从指定的目录中打开一个文档？
本讲内容参考程序文件：Doc 003文档.docm
分享成果，随喜正能量
我20多年的VBA实践经验，全部浓缩在下面的各个教程及应用工具中：
