Microsoft Office 2016 - Como aplicar Macro apenas ao texto selecionado?

0

Criei Macro para substituir vários caracteres ao mesmo tempo. Se eu aplicá-lo a todo o documento e colar outro texto no mesmo documento, aplicar a mesma macro será bom 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 apenas ao texto selecionado, deixando o restante do documento intocado.

Ajuda alguém?

Atenciosamente, Tom

Tomislav Lemal
fonte
Você pode mostrar o código fonte da sua macro? A solução pode depender de como você trabalha com o objeto de seleção na macro.
duDE 8/12
Este é o código: textuploader.com/dq37a Obrigado!
Tomislav Lemal

Respostas:

1

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

' Macro1 Macro
'
'
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = "ä"
        .Replacement.Text = ChrW(257)
        .Forward = True
        .Wrap = wdFindContinue
cara
fonte
Está funcionando apenas quando seleciono o texto. Mas se o texto não for selecionado (mouse cursor a piscar), então ele applys para documento inteiro a partir do ponto onde o cursor do mouse é (nenhum texto selecionado)
Tomislav Lemal
Você não quis dizer "Eu estava pensando que o problema seria resolvido se a Macro pudesse ser aplicada apenas ao texto selecionado"?
duDE 8/12
bem ... ele faria, mas um pouco upgrade seria bom :)
Tomislav Lemal