Application.CustomDictionaries 属性 (Word)

返回一个 Dictionaries 对象，该对象代表活动自定义词典的集合。 只读。

语法

expression。 CustomDictionaries

expression：表示 Application 对象的变量。

备注

选中“自定义词典”对话框中的相应复选框可将其标记为活动自定义词典。 有关返回集合的单个成员的信息，请参阅 从集合中返回对象。

示例

本示例在该集合中添加一个新的空白自定义词典。 然后在消息框中显示该自定义词典的路径和文件名。

Dim dicHome As Dictionary 
Set dicHome = CustomDictionaries.Add(Filename:="Home.dic") 
Msgbox dicHome.Path & Application.PathSeparator & dicHome.Name

本示例清除所有的自定义词典以便没有激活状态的自定义词典。 但并非删除自定义词典文件。

CustomDictionaries.ClearAll

本示例显示该集合中所有自定义词典的名称。

Dim dicLoop As Dictionary 
 
For Each dicLoop In CustomDictionaries 
 MsgBox dicLoop.Name 
Next dicLoop

另请参阅

Application 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。