大家好,我新推出的《VBA之Word应用》教程是专门讲解VBA在Word中的应用,是围绕“面向对象编程”讲解,让大家认识Word中VBA的对象,以及对象的属性、方法的利用。通过这套教程的学习,可以让广大学员扩展自己的VBA应用。本套教程共三册十六章,其中前十五章是各种对象属性、方法的讲解,每节都有专门的实例说明这些属性方法的具体应用,最后一章是结和具体应用场景的讲解,共有二十八个实际工作中常见的实例。下面是第一章“初步认识Word之VBA”内容,今日讲解的是第四节:Word中对象属性(Properties)的理解及示例
第四节 Word中对象属性(Properties)的理解及示例大家好,我们继续讲解从VBA的角度来认识Word。在上一节我们主要理解了Word中对象和集合的概念,并以两个对象Document和Paragraph为例让大家对对象和集合有所了解。这节中我们继续向下学习,面向对象编程有了对象,下一个知识点就是要理解对象的属性(Properties)。
1 什么是对象的属性(Properties)属性是指对象的特征或其行为。例如,文档的属性包括其名称、内容及其保存状态,以及变更跟踪是否已打开等等,我们看看下面的一些文档的属性介绍。
1)AutoSaveOn 属性
语法: expression.AutoSaveOn
其中expression 表示一个Document object.
说明:如果AutoSaveOn属性为TRUE将自动保存文档中的编辑。创建新文档时, AutoSaveOn属性的默认值为False,表示将禁用该属性, 并且需要手动保存用户所做的更改。 但是, 如果文档托管在云(即onedrive、onedrive for business或SharePoint Online)上,则AutoSaveOn属性默认为True,并且自动保存指定文档中的编辑。如果与其他用户共享云承载的文档, 则当AutoSaveOn为True时, 这些文档的更改也会自动合并到用户的本地副本中。
2)FullName 属性
语法:expression.FullName
其中expression 表示一个Document object.
说明:这个属性返回一个字符串,表示文档的名称,包括路径。此为只读属性。
3)Name 属性
语法:expression.Name
其中expression 表示一个Document object.
说明:这个属性返回指定对象的名称。只读的字符串。
4)TrackRevisions 属性
语法:expression.TrackRevisions
其中expression 表示一个Document object.
说明:如果这个属性设置为true则指定文档中跟踪更改。
以上只是举例说明了文档对象的一些属性,其实每个对象的属性都非常多,以后再用到的时候再给大家讲解。
从以上的讲解中我们可以看到,若要更改对象的特征,可以更改其属性的值。
2 对象属性的设置若要设置属性的值,可以按照下面的示例,注意属性的写法,用对象的名称 半角圆点 新的属性值的写法。
示例1:下面的例子对名称为"示例01.doc"的文档中启用了变更跟踪。
Sub mynzG() '启用了变更跟踪属性
Dim myDoc As Document
Set myDoc = Documents.Open(ActiveDocument.Path & "\示例01.docx")
Documents("示例01").Activate
MsgBox Documents("示例01").TrackRevisions
If Documents("示例01").TrackRevisions = False Then Documents("示例01").TrackRevisions = True
MsgBox Documents("示例01").TrackRevisions
End Sub
代码的截图:
代码讲解:
在此示例中,首先要打开一个名称"示例01"的文档。然后提供给用户这个文档的TrackRevisions属性值;如果这个属性值为false,则更改为true。
代码的操作过程截图: