第五章WordVBA常用对象与应用案例.pptVIP

第二章 Word VBA常用对象与应用案例  对象的概念和对象变量的定义 对象的概念 对象（object）是一些相关的变量和方法的集合。Office VBA是一种面向对象的编程语言。对象是VBA的结构基础，VBA应用程序就是由许多对象组成。 在Office中，VBA对象可分为集合对象和独立对象两种。独立对象代表一个Office中的一个元素，如Word中的一个文档、一个段落、一个书签或单独的字符。集合也是一个对象，该对象包含多个其他对象，通常这些对象属于相同的类型；例如，在Word中，一个Documents集合对象中可包含文档中的所有Document对象。修改与对象相关的方法或属性就可以定制对象，也可修改整个的对象集合。 在VBA中，有一个变量的数据类型是Object，即对象型变量。使用对象变量代替一个对象是指：不直接引用该对象，而使用对象变量访问其代表的对象 对象的概念和对象变量的定义 例如，一段程序同时处理三个打开的Word文档，从一个文档中将一些文本复制到另外两个文档中去。如果仅仅打开了这三个文档，就可以分别引用，如写成Documents(1)、Documents(2)、Documents(3)，因为这些文档在Documents集合中占有前三个位置。 然而，如果程序改变了文档的顺序，关闭一个或多个文档，或者生成一个和多个新的文档，情况立刻就会变得混乱起来。但是如果使用了对象变量（例如，命名为Words1、Words2、Words3）去引用这些文档，情况就简单得多。这是因为不论在Documents集合中哪个文档处在第一的位置，总可以用对象变量Wordsl~3进行引用，并了解将要使用的文档。 对象的概念和对象变量的定义 对象变量的定义 Dim MyObject1 As Object Set objectvariable=expression|nothing 例如，下面的语句声明MyObject1变量，并赋值为Excel的当前工作簿： Dim exObject1 As Object Set exObject1=ActiveDocument 而下面的语句使用Nothing关键字，则释放exObject1对象变量占用的内存空间： Set exObject1=Nothing Word中的常用对象 Word中常用的对象有：Application对象、Document对象、Range对象、Selection对象、Paragraph对象、Sentences对象、Words对象、Characters对象、Find与Replacement对象、Table（包括Column、Row和Cell）对象等。 其中，Application对象是Word中最高级别的对象，它就是Word应用程序本身。 Word中的常用对象 Application对象 用户启动一个Word时的同时，也创建了一个Application对象。Application对象位于对象模型的最高级，它代表整个Word应用程序，而且此对象的属性和方法独立于所有文档之外，全部针对的是Word应用程序本身。用户可以使用Application对象的属性或方法来控制或返回应用程序范围内的特性、控制应用程序窗口的外观等。可以使用Application属性来返回Word Application对象。如，以下的语句表示从视图状态切换到打印预览状态。 Application.PrintPreview = True Word中的常用对象 Sub application1() With Application .WindowState = wdWindowStateNormal .Height = 450 .Width = 600 End With End Sub Word中的常用对象 Word中的常用对象 Word中的常用对象 用户可以用以下的代码检查Documents集合的Count属性来确认是否有文档是打开的。 Sub application2() If Documents.Count = 0 Then If MsgBox(没有文档被打开！ vbCr vbCr _ 你希望创建一个空白文档吗?, _ vbYesNo + vbExclamation, No Doccnnent Is Open) = vbYes Then Documents.Add Else