Свойство Global.Languages (Word)
Возвращает коллекцию Languages , представляющую языки правописания, перечисленные в диалоговом окне Язык .
Синтаксис
выражение. Languages
выражение (обязательно). Переменная, представляющая глобальный объект.
Замечания
Сведения о возврате одного члена коллекции см. в разделе Возвращение объекта из коллекции.
Пример
В этом примере возвращается полный путь и имя файла активного словаря орфографии.
Dim dicSpell As Dictionary
Set dicSpell = _
Languages(Selection.LanguageID).ActiveSpellingDictionary
MsgBox dicSpell.Path & Application.PathSeparator & dicSpell.Name
В этом примере для хранения имен языков проверки правописания используется массив aLang( ).
Dim intCount As Integer
Dim langLoop As Language
Dim aLang(Languages.Count - 1) As String
intCount = 0
For Each langLoop In Languages
aLang(intCount) = langLoop.NameLocal
intCount = intCount + 1
Next langLoop
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.