北京智能网站建设系统加盟无锡百度推广平台

《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实践经验，全部浓缩在下面的各个教程及应用工具中：