Свойство Language.ActiveSpellingDictionary (Word)
Возвращает объект Dictionary , представляющий активный словарь правописания для указанного языка.
Синтаксис
выражение. ActiveSpellingDictionary
Выражение Выражение, возвращающее объект Language.
Замечания
Если для указанного языка не установлен словарь орфографии, это свойство возвращает Значение Nothing.
Пример
В этом примере возвращается полный путь и имя файла активного словаря орфографии.
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
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.