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.