Share via


ActiveHyphenationDictionary Property

Returns a Dictionary object that represents the active hyphenation dictionary for the specified language. Read-only.

Remarks

If there's no hyphenation dictionary installed for the specified language, this property returns Nothing.

Example

This example displays the full path and file name of the active hyphenation dictionary.

  Dim lngLanguage As Long
Dim dicHyphen As Dictionary

lngLanguage = Selection.LanguageID
Set dicHyphen = Languages(lngLanguage).ActiveHyphenationDictionary
If dicHyphen Is Nothing Then
    MsgBox "No hyphenation dictionary installed!"
Else
    MsgBox dicHyphen.Path & Application.PathSeparator & dicHyphen.Name
End If