潍坊企业免费建站免费网页制作成品
《VBA之Word应用》（版权10178982），是我推出第八套教程，教程是专门讲解VBA在Word中的应用，围绕“面向对象编程”讲解，首先让大家认识Word中VBA的对象，以及对象的属性、方法，然后通过实例让大家感受到Word VBA 的妙处。
这套教程是专门针对WORD VBA 的教程，是VBA中的稀缺资源，我给这套教程分归为中级教程，希望大家在VBA入门后再学习这套教程，这样会更加深入的理解面向对象编程的意义。
本套教程共三册十六章，今日内容为：VBA之Word应用第三章第七节:文档Document对象的方法（一）
【分享成果，随喜正能量】求木之长者，必固其根本；欲流之远者，必浚其泉源。传承不是一厢情愿的，而是用合适自己的方式，传递内心的欢喜，分享自己的爱，才能释放出百分百的能量。。
第三章 文档集合Documents对象及文档Document对象
大家好，我们继续Word VBA的讲解。这讲开始，我们进入非常重要一章的学习，文档集合Documents对象及文档Document对象。在前面的讲解中我们可以大概看出文档和文档集合在Word VBA中的作用，很多的对象都是文档对象属性的返回对象，我们通过这章的学习要掌握Word VBA的基本应用。
第七节 文档Document对象的方法（一）
大家好，我们这节开始讲解Document对象的方法。在我的教程中已经反复地讲过：方法就是对象本身的动作，我们来看看Document对象有哪些动作可以利用。
1 Document. Activate 方法
这个方法会激活指定的文档，使其成为活动文档。
语法：expression.Activate
其中：expression 代表一个 Document对象
2 Document.Close 方法
这个方法关闭指定的文档。
语法：expression.Close (SaveChanges, OriginalFormat, RouteDocument)
其中：expression 代表一个 Document对象
参数：
1) SaveChanges 可选 Variant 指定保存文档的操作。可以是下列的WdSaveOptions常量之一: wdDoNotSaveChanges、wdPromptToSaveChanges或wdSaveChanges。
2) OriginalFormat可选 Variant 指定保存文档的格式。可以是下列的WdOriginalFormat 常量之一: wdOriginalDocumentFormat、wdPromptUser或wdWordDocument。
3) RouteDocument 可选Variant True 将文档传送给下一个收件人。 如果文档没有附加的传送名单，则忽略此参数。
3 Document.ClosePrintPreview 方法
这种方法将指定文档从打印预览视图切换到以前的视图。
语法：expression. ClosePrintPreview
其中：expression 代表一个 Document对象
- 如果指定文档未处于打印预览视图，将出现错误。我们可以利用下面代码来判断文档是否处于打印预览状态：
If ActiveDocument.PrintPreview = True Then ActiveDocument.ClosePrintPreview
4 Document.DeleteAllComments 方法
删除文档中所有批注。
语法：expression. DeleteAllComments
其中：expression 代表一个 Document对象
示例：我们可以用ActiveDocument.DeleteAllComments 可以删除当前活动文档中的所有批注。
5 Document.Range 方法
这种方法使用指定的起始和结束字符位置返回一个Range对象。
语法：expression.Range (Start, End)
其中：expression 代表一个 Document对象
参数：
1）Start 可选 Variant 开始字符位置。
2）End 可选 Variant 结束字符位置。
这节的内容主要是讲Document对象一些常见的方法，我们介绍的Activate 方法，Close 方法，ClosePrintPreview 方法，DeleteAllComments 方法Range 方法，这些方法是比较常见的，我们要了解掌握。
今日内容回向：
1 文档对象的Activate方法，Close方法，ClosePrintPreview方法，DeleteAllComments方法Range方法的意义是什么？
2 Range方法中如何定义所选区域的开始和结束位置？
本讲内容参考程序文件：Doc 003文档.docm
分享成果，随喜正能量
我20多年的VBA实践经验，全部浓缩在下面的各个教程及应用工具中：
