Partilhar via


Objeto ProofreadingErrors (Word)

Uma coleção dos erros ortográficos e gramaticais do documento ou do intervalo especificado.

Comentários

Use a propriedade SpellingErrors ou GrammaticalErrors para retornar a coleção ProofreadingErrors. O exemplo a seguir calcula os erros ortográficos e gramaticais da seleção e exibe os resultados em uma caixa de mensagem.

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

Use SpellingErrors (Index), onde Index é o número de índice, para retornar um único erro ortográfico (representado por um objeto Range ). O exemplo a seguir localiza o segundo erro ortográfico da seleção e seleciona.

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

Use GrammarErrors (Index), onde Index é o número de índice, para retornar um único erro gramatical (representado por um objeto Range ). O exemplo a seguir retorna a frase que contém o primeiro erro gramatical na seleção.

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

A propriedade Count dessa coleção em um documento retorna o número de itens no texto principal. Para contar itens em outros textos usam a coleção com o objeto de intervalo. Se todas as palavras no documento ou intervalo estão escritas corretamente e estão gramaticalmente corretas, a propriedade Count do objeto ProofreadingErrors retorna 0 (zero) e as propriedades SpellingChecked e GrammarChecked retornam True.

Observação

[!OBSERVAçãO] Não há nenhum objeto ProofreadingError; em vez disso, cada item da coleção ProofreadingErrors é um objeto Range que representa o erro um ortográfico ou gramatical.

Confira também

Referência do modelo de objeto do Word

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.