Upravit

Sdílet prostřednictvím


Application.CustomDictionaries property (Word)

Returns a Dictionaries object that represents the collection of active custom dictionaries. Read-only.

Syntax

expression. CustomDictionaries

expression A variable that represents an Application object.

Remarks

Active custom dictionaries are marked with a check in the Custom Dictionaries dialog box. For information about returning a single member of a collection, see Returning an object from a collection.

Example

This example adds a new, blank custom dictionary to the collection. The path and file name of the new custom dictionary are then displayed in a message box.

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

This example removes all custom dictionaries so that no custom dictionaries are active. The custom dictionary files aren't deleted, though.

CustomDictionaries.ClearAll

This example displays the name of each custom dictionary in the collection.

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

See also

Application Object

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.