《抽象工厂》专题

表示邮件合并操作中的邮件合并数据源。 使用 OfficeDataSourceObject 对象 要使用 OfficeDataSourceObject 对象，请声明一个 OfficeDataSourceObject 对象的变量。然后即可使用该对象相关的不同属性和方法。使用 SetSortOrder 方法指定如何排序数据源中的记录。本示例首先对数据源按邮政编码降序排序，然后再按姓名升序排序。 Sub

表示应用于附加到邮件合并发布内容的数据源的所有筛选。ODSOFilters 对象由 ODSOFilter 对象组成。 使用 ODSOFilters 对象 使用 ODSOFilters 对象的Add 方法在查询中新添一个筛选条件。本示例在查询字符串中添加一行，然后将合并的筛选应用于数据源。 Sub SetQueryCriterion() Dim appOffice As OfficeData

表示应用于附加的邮件合并数据源的筛选。ODSOFilter 对象为 ODSOFilters 对象的成员。 使用 ODSOFilter 对象 每个筛选为查询字符串中的一行。使用Column、Comparison、CompareTo 和Conjunction 属性返回或设置数据源查询条件。本示例更改已有筛选，从邮件合并中删除所有 Region 域不等于 "WA" 的记录。 Sub SetQueryCr

表示邮件合并数据源中数据域的 ODSOColumn 对象的集合。 使用 ODSOColumns 对象 使用Columns 属性返回ODSOColumns 集合。本示例显示附加到活动应用程序的数据源中的域名。 Sub ShowFieldNames() Dim appOffice As OfficeDataSourceObject Dim intCount As Integer

表示数据源中的域。ODSOColumn 对象为 ODSOColumns 集合的成员。ODSOColumns 集合包括邮件合并数据源中的所有数据域（例如，名字、地址和城市）。 使用 ODSOColumn 对象 使用 Columns(index) 返回单个 ODSOColumn 对象，其中 index 为数据域名称或索引号。索引号表示数据域在邮件合并数据源中的位置。本示例检索附加到活动发布内容的数据源

NewFile 对象表示很多 Microsoft Office 应用程序中“新建项”任务窗格上列出的项。下表列出了在每个应用程序中用于访问 NewFile 对象的属性。 注释 下面示例适用于 Word，但是可以将 NewDocument 属性更改为上面所列的任何属性并在相应的应用程序中使用该代码。 使用 NewFile 对象 使用 Add 方法在“新建项”任务窗格中添加新项。本示例在 Word 的

提供直接从 Microsoft Office 应用程序以邮件发送文档的功能。 使用 MsoEnvelope 对象 使用 Document 对象、Chart 对象或 Worksheet 对象（取决于使用的应用程序）的 MailEnvelope 属性返回一个 MsoEnvelope 对象。 本示例将活动的 Microsoft Word 文档以电子邮件发送到传递给子例程的电子邮件地址。 Sub Send

返回 Microsoft Office 应用程序中有关语言设置的信息。 使用 LanguageSettings 对象 使用Application.LanguageSettings.LanguageID（MsoAppLanguageID），此处MsoAppLanguageID 是一个用于将地区标识符 (LCID) 信息返回到指定应用程序的常量。 以下示例在消息框中显示安装语言、用户界面语言和帮助语言

代表一个单独的工程项，该工程项是“Microsoft 脚本编辑器”中“工程资源管理器”的一个工程项分支。HTMLProjectItem 对象是HTMLProjectItems 集合的一个成员。 使用 HTMLProjectItem 对象 用HTMLProjectItems(index)，返回一个HTMLProjectItem 对象，其中index 是工程项的索引号或名称。用Name 属性返回工程项

与在“Microsoft 脚本编辑器”的“工程资源管理器”中的作用一样，该对象代表最高一层的工程分支。 使用 HTMLProject 对象 用HTMLProject 对象的Open 方法在“Microsoft 脚本编辑器”中打开 HTML 工程。对于 Microsoft Word 文档、Excel 工作簿或 PowerPoint 演示文稿，该工程在源代码视图或文本视图中打开。以下示例在源代码视图中

代表由文件查找过程返回的文件列表。 使用 FoundFiles 对象 用FoundFiles 属性可返回FoundFiles 对象。本示例可实现：逐个查看找到的文件列表中的文件并显示其中每个文件的文件名和路径。用FoundFiles(index) 可返回查找过程中指定文件的名称和位置，此处的index 是该文件的索引号。 With Application.FileSearch For i = 1

本主题中的某些内容可能不适用于某些语言。 代表“文件”菜单中“打开”对话框的功能。 使用 FileSearch 对象 用FileSearch 属性可返回FileSearch 对象。以下示例可实现：查找指定文件并显示找到的文件数及每个找到的文件的标题。 With Application.FileSearch If .Execute() > 0 Then MsgBox "There were "

返回通过 FileDialog 对象显示的文件对话框中的一个文件筛选。每个文件筛选确定文件对话框中显示的文件。 使用 FileDialogFilter 对象 使用 FileDialogFilters 集合的 Item 方法返回一个 FileDialogFilter 对象。使用 Add 方法向 FileDialogFilters 集合中添加一个 FileDialogFilter 对象。可以使用 Ex

提供文件对话框，功能与 Microsoft Office 应用程序中标准的“打开”和“保存”对话框类似。利用这些对话框，解决方案的用户可以简便地指定解决方案中应该使用的文件和文件夹。 使用 FileDialog 对象 使用 FileDialog 属性返回一个 FileDialog 对象。FileDialog 属性位于每个单独 Office 应用程序的 Application 对象中。该属性使用一个

代表容器文档的一个自定义或内置文档属性。DocumentProperty 对象是DocumentProperties 集合中的成员。 使用 DocumentProperty 对象 用BuiltinDocumentProperties(index) 可返回一个单一的DocumentProperty 对象，该对象代表一个特定的内置文档属性；此处index 是该内置文档属性的名称或索引号。用Custom