Объект Language (Word)
Представляет язык, используемый для проверки правописания или форматирования в Microsoft Word. Объект Language является членом коллекции Languages .
Замечания
Используйте languages (Index) для возврата одного объекта Language , где Index может быть значением свойства Name , значением свойства NameLocal , одной из констант WdLanguageID или одной из констант MsoLanguageID . (Список допустимых констант WdLanguageID или MsoLanguageID см. в разделе Обозреватель объектов в редакторе Visual Basic.)
Свойство Name возвращает имя языка, а свойство NameLocal — имя языка пользователя. В следующем примере возвращается строка "Italiano" в поле Name и "Italian (Standard)" для NameLocal при выполнении в версии Word на английском языке США.
Sub ShowItalianNames()
Msgbox Languages(wdItalian).Name
Msgbox Languages(wdItalian).NameLocal
End Sub
Для каждого языка, для которого установлены средства проверки правописания, можно использовать свойства ActiveGrammarDictionary, ActiveHyphenationDictionary, ActiveSpellingDictionary и ActiveThesaurusDictionary , чтобы вернуть соответствующий объект Dictionary . В следующем примере возвращается полный путь к активному словарю правописания, используемому в версии Word на английском языке США.
Sub ShowDictionaryPath
Set myspell = Languages(wdEnglishUS).ActiveSpellingDictionary
MsgBox mySpell.Path & Application.PathSeparator & mySpell.Name
End Sub
Стиль написания — это набор правил, используемых средством проверки грамматики. Свойство WritingStyleList возвращает массив строк, представляющих доступные стили записи для указанного языка. В следующем примере возвращается список стилей записи для английского языка США.
Sub ListWritingStyles()
WrStyles = Languages(wdEnglishUS).WritingStyleList
For i = 1 To UBound(WrStyles)
MsgBox WrStyles(i)
Next i
End Sub
Используйте свойство DefaultWritingStyle , чтобы задать стиль записи по умолчанию, который будет использоваться в Word.
Languages(wdEnglishUS).DefaultWritingStyle = "Casual"
Стиль записи по умолчанию можно переопределить с помощью свойства ActiveWritingStyle . Это свойство применяется к указанному документу для текста, помеченного на указанном языке. В следующем примере задается стиль письма, используемый для проверки английского, французского и немецкого языков США в активном документе.
Sub SetWritingStyle()
With ActiveDocument
.ActiveWritingStyle(wdEnglishUS) = "Technical"
.ActiveWritingStyle(wdFrench) = "Commercial"
.ActiveWritingStyle(wdGerman) = "Technisch/Wiss"
End With
End Sub
Если вы помечаете текст как wdNoProofing, Word пропускает помеченный текст при выполнении проверки орфографии или грамматики.
Примечание.
Для каждого языка, который вы планируете проверить, должны быть установлены средства проверки правописания. Дополнительные сведения о работе на других языках см. в разделе Сведения о языке.
См. также
Справочник по объектной модели Word
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.