Language.ActiveSpellingDictionary property (Word)
Returns a Dictionary object that represents the active spelling dictionary for the specified language.
Syntax
expression. ActiveSpellingDictionary
expression An expression that returns a 'Language' object.
Remarks
If there is no spelling dictionary installed for the specified language, this property returns Nothing.
Example
This example returns the full path and file name of the active spelling dictionary.
Dim lngLanguage As Long
Dim dicSpelling As Dictionary
lngLanguage = Selection.LanguageID
Set dicSpelling = Languages(lngLanguage).ActiveSpellingDictionary
If dicSpelling Is Nothing Then
MsgBox "No spelling dictionary installed!"
Else
MsgBox dicSpelling.Path & Application.PathSeparator _
& dicSpelling.Name
End If
See also
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.