Auto-correcção aumentada na palavra MS - realce palavras alteradas

Question

Eu tenho a doença de Parkinson em estágio inicial, o que me causa alguma dificuldade de digitação.

Eu tenho procurado maneiras de melhorar o recurso auto-correto do MS-Word (e, idealmente, do MS Outlook), pois há muitos erros que não são detectados, e leva uma idade para corrigi-los manualmente e atualize a lista auto-correta, então evite o mesmo erro no futuro - e você ficaria surpreso com quantas combinações erradas podem ser feitas com a digitação de dedos grossos (ou talvez não:).

Eu encontrei essa excelente sugestão em outro lugar, o que ajuda muito na solução:

Autocorreção para "dedos gordos" - MS Word

No entanto, estou preocupado que uma palavra seja substituída pela palavra alternativa errada, a qual teria então uma grafia correta - e, portanto, seria perdida pela verificação ortográfica posterior, deixando possíveis erros que são difíceis de encontrar.

Tenho, portanto, duas perguntas:

1. Alguém pode sugerir um mod para o script para que as palavras alteradas sejam destacadas?

2. Alguém pode dar uma ideia se o script pode atrasar documentos grandes?

Answer 1

Eu não tenho o Word, mas tentei modificar o script da seguinte forma:

Sub AutoSpellCheck()
    Dim oSE As Range
    Dim oSC
    For Each oSE In ActiveDocument.Range.SpellingErrors
        Set oSC = oSE.GetSpellingSuggestions
        If oSC.Count > 0 Then
        oSE.Text = oSC(1)
        oSE.HighlightColorIndex = wdYellow
        Else
        oSE.HighlightColorIndex = wdRed
        End If
    Next oSE
End Sub

Palavras com erros ortográficos que não são alteradas devem ser destacadas em vermelho; aqueles que são alterados devem ser destacados em amarelo.

Suponho que a velocidade de execução do script dependerá, em parte, do poder de processamento do seu computador.