MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    Enviar dados do formulário para o código VBA

    Compartilhe

    guedesjr7
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 5
    Registrado : 03/05/2016

    Enviar dados do formulário para o código VBA

    Mensagem  guedesjr7 em Ter 21 Jun 2016, 15:11

    Bom dia galera.
    Tenho necessidade frequente de substituir palavras nos textos que escrevo.
    Exemplo: substituir "s/a" por "S/A".

    Frequentemente eu atualizo meu código VBA do word com a expressão que desejo substituir.

       Selection.Find.ClearFormatting
       Selection.Find.Replacement.ClearFormatting
       With Selection.Find
           .Text = " s/a "
           .Replacement.Text = " S/A "
           .Forward = True
           .Wrap = wdFindContinue
           .Format = False
           .MatchCase = True
           .MatchWholeWord = False
           .MatchWildcards = False
           .MatchSoundsLike = False
           .MatchAllWordForms = False
       End With
       Selection.Find.Execute Replace:=wdReplaceAll

    Por isso, eu desejo tornar essa tarefa mais simples.
    Criei, então, um formulário com as seguintes entradas:

    - localizar: <>
    - substituir por: <>
    Botão incluir

    Com isso, ao inserir essas palavras e pressionar o botão incluir, desejo que essas palavras fiquem registradas no código da macro que executo para substituir expressões. Mas não faço ideia de como escrever esse código...

    Sei que o site é sobre Access, mas como vocês são o pessoal mais responde a dúvidas, desejei pedir a ajuda de vocês.

    Obrigado.
    avatar
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6256
    Registrado : 05/11/2009

    Re: Enviar dados do formulário para o código VBA

    Mensagem  Alexandre Neves em Qua 22 Jun 2016, 21:46

    Boa noite,
    Crie uma tabela com campos ExpressaoAntiga e ExpressaoNova
    Execute o código com linha a linha da tabela


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

      Data/hora atual: Sab 22 Jul 2017, 09:36