Microsoft Office 2016 - Como aplicar a macro somente para o texto selecionado?

Question

Eu criei o Macro para substituir vários caracteres de uma só vez. Se eu aplicá-lo para todo o documento e, em seguida, colar outro texto no mesmo documento, aplicar a mesma macro fará bem para o texto recém-colado, mas atrapalhará o restante do texto ao qual a macro já foi aplicada.

Eu estava pensando que o problema seria resolvido se a Macro pudesse ser aplicada somente para o texto selecionado, deixando o resto do documento intocado.

Ajuda, alguém?

Atenciosamente, Tom

    

Answer 1

Altere .Wrap = wdFindContinue para .Wrap = wdFindStop em sua macro:

' Macro1 Macro
'
'
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = "ä"
        .Replacement.Text = ChrW(257)
        .Forward = True
        .Wrap = wdFindContinue