Объект ProofreadingErrors (Word)

Коллекция орфографических и грамматических ошибок для указанного документа или диапазона.

Замечания

Используйте свойство SpellingErrors или GrammaticalErrors , чтобы вернуть коллекцию ProofreadingErrors . В следующем примере производится подсчет орфографических и грамматических ошибок в выделенном фрагменте и отображение результатов в окне сообщения.

Set pr1 = Selection.Range.SpellingErrors 
 sc = pr1.Count 
Set pr2 = Selection.Range.GrammaticalErrors 
 gc = pr2.Count 
Msgbox "Spelling errors: " & sc & vbCr _ 
 & "Grammatical errors: " & gc

Используйте spellingErrors (Index), где Index — это номер индекса, чтобы вернуть одну орфографическую ошибку (представленную объектом Range ). В следующем примере в выделении обнаруживается вторая орфографическая ошибка, а затем выбирается.

Set myRange = Selection.Range.SpellingErrors(2) 
myRange.Select

Используйте GrammarErrors (Index), где Index — это номер индекса, чтобы вернуть одну грамматическую ошибку (представленную объектом Range ). В следующем примере возвращается предложение, содержащее первую грамматическую ошибку в выделенном фрагменте.

Set myRange = Selection.Range.GrammaticalErrors(1) 
Msgbox myRange.Text

Свойство Count для этой коллекции в документе возвращает количество элементов только в основной истории. Для подсчета элементов в других историях используйте коллекцию с объектом Range . Если все слова в документе или диапазоне написаны правильно и грамматически верны, свойство Count для объекта ProofreadingErrors возвращает значение 0 (ноль), а свойства SpellingChecked и GrammarChecked возвращают значение True.

Примечание.

Объект ProofreadingError отсутствует; Вместо этого каждый элемент в коллекции ProofreadingErrors является объектом Range , который представляет одну орфографическую или грамматическую ошибку.

См. также

Справочник по объектной модели Word

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.