Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Анализирует указанный текст, чтобы определить язык, на который он написан.
Синтаксис
выражение. DetectLanguage
выражение (обязательно). Переменная, представляющая объект Document .
Замечания
При применении к объекту Document метод DetectLanguage проверяет весь доступный текст в документе (колонтитулы, нижние колонтитулы, текстовые поля и т. д.). Если указанный текст содержит частичное предложение, выделение или диапазон расширяется до конца предложения.
Если метод DetectLanguage уже применен к указанному тексту, свойству LanguageDetected присвоено значение True. Чтобы повторно оценить язык указанного текста, необходимо сначала задать для свойства LanguageDetectedзначение False.
Пример
В этом примере проверяется активный документ для определения языка, на котором он написан, а затем отображается результат.
With ActiveDocument
If .LanguageDetected = True Then
x = MsgBox("This document has already " _
& "been checked. Do you want to check " _
& "it again?", vbYesNo)
If x = vbYes Then
.LanguageDetected = False
.DetectLanguage
End If
Else
.DetectLanguage
End If
If .Range.LanguageID = wdEnglishUS Then
MsgBox "This is a U.S. English document."
Else
MsgBox "This is not a U.S. English document."
End If
End With
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.