Word para incluir erros gramaticais na impressão (sublinhados em verde e vermelho)

Question

Para as folhas de exame da minha irmã, ela quer imprimir documentos do Word, incluindo os erros gramaticais (sublinhados em zigue-zague verdes, vermelhos e azuis), para que os alunos possam corrigi-los. Eu sugeri simplesmente colocar formas de linha nas palavras gramaticalmente incorretas, mas existe uma maneira de incluir essas linhas de erro?

Eu digitei google ("inclua gramaticalmente linhas de erro ao imprimir a palavra"), mas isso não produziu bons resultados.

    

Answer 1

Você pode usar uma macro para adicionar real sublinhado ondulado colorido aos erros no texto para você e, em seguida, imprimi-lo.

Sub addlines()
Dim err As Object
    For Each err In ActiveDocument.Range.GrammaticalErrors
        With err.Font
            .Underline = wdUnderlineWavy
            .UnderlineColor = wdColorGreen
        End With
    Next
    For Each err In ActiveDocument.Range.SpellingErrors
        With err.Font
            .Underline = wdUnderlineWavy
            .UnderlineColor = wdColorRed
        End With
    Next
End Sub