CustomDictionaries Property 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.

Set myHome = CustomDictionaries.Add(Filename:="Home.dic")
Msgbox myHome.Path & Application.PathSeparator & myHome.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.

For Each di In CustomDictionaries
    MsgBox di.Name
Next di