Converter alterações controladas em realçadas (continuação)

Question

existe uma linha que poderíamos adicionar à seguinte rotina VBA para destacar uma letra antes e uma letra depois de todo o texto excluído, para que todas as alterações sejam aceito, ainda podemos visualizar onde algum texto foi excluído? Aqui está o código que estou falando de um post anterior:

Existe o objeto Revisions no VBA. A partir daí, é simples fazer uma iteração em cada item de revisão, aceitá-lo e selecioná-lo com uma cor predefinida.

Além disso, precisamos desabilitar temporariamente o rastreamento.

Sub tracked_to_highlighted()           
    tempState = ActiveDocument.TrackRevisions
    ActiveDocument.TrackRevisions = False    
    For Each Change In ActiveDocument.Revisions        
        Set myRange = Change.Range
        myRange.Revisions.AcceptAll
        myRange.HighlightColorIndex = wdGreen            
    Next    
    ActiveDocument.TrackRevisions = tempState

End Sub