MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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

3 participantes

    [Resolvido]Copiar dados de um campo para outro e substituir parte dos dados

    julianovv
    julianovv
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 638
    Registrado : 14/12/2010

    [Resolvido]Copiar dados de um campo para outro e substituir parte dos dados Empty [Resolvido]Copiar dados de um campo para outro e substituir parte dos dados

    Mensagem  julianovv 2/12/2011, 12:44

    Bom dia! Tenho duas tabelas, tbl_PVE e tbl_CVE. Preciso copiar o campo "pve" da primeira para o campo "cve" da segunda. Seria até bem simples se não fosse pelo detalhe: todos os registros do campo "pve" começam com PVE0001, PVE0002; PVE0003, etc (esse campo é texto e são digitados assim mesmo na sequência) e preciso trocar o PVE pelo CVE nesses registros.
    Exemplo:
    De:
    PVE0107_VETRATO MINIBUS PREF.MUN.CANOAS

    Para:
    CVE0107_VETRATO MINIBUS PREF.MUN.CANOAS

    Obrigado!
    Rolling Eyes
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Copiar dados de um campo para outro e substituir parte dos dados Empty Re: [Resolvido]Copiar dados de um campo para outro e substituir parte dos dados

    Mensagem  criquio 2/12/2011, 12:49

    Use o Replace:

    rs2!cve = Replace(rs1!pve;"PVE";"CVE")


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    julianovv
    julianovv
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 638
    Registrado : 14/12/2010

    [Resolvido]Copiar dados de um campo para outro e substituir parte dos dados Empty Re: Copiar dados de um campo para outro e substituir parte dos dados

    Mensagem  julianovv 2/12/2011, 13:24

    Obrigado mas não entendi o código. Onde está a referência às tabelas nele?
    O registro é copiado para o campo cve depois que ele é escolhido em uma lista suspensa no formulário.
    To lembrando de um detalhe que faltou. Existe uma caixa de opção CVE no formulário PVE. Essa caixa de opção precisa estar marcada como sim para que o campo "pve" seja copiado e colado no campo "cve".

    Shocked
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Copiar dados de um campo para outro e substituir parte dos dados Empty Re: [Resolvido]Copiar dados de um campo para outro e substituir parte dos dados

    Mensagem  criquio 2/12/2011, 14:27

    Tente assim:

    Me.NomeDoCampo = Replace(Me.NomeDaLista, "PVE", "CVE")

    ou se tiver mais de uma coluna na lista, colocar a coluna correta:

    Me.NomeDoCampo = Replace(Me.NomeDaLista.Column(1), "PVE", "CVE")


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    julianovv
    julianovv
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 638
    Registrado : 14/12/2010

    [Resolvido]Copiar dados de um campo para outro e substituir parte dos dados Empty Re: Copiar dados de um campo para outro e substituir parte dos dados

    Mensagem  julianovv 5/12/2011, 10:49

    Ok, obrigado! Vou tentar aqui e mando um retorno.

    Wink
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Copiar dados de um campo para outro e substituir parte dos dados Empty Re: [Resolvido]Copiar dados de um campo para outro e substituir parte dos dados

    Mensagem  Alexandre Neves 6/12/2011, 19:30

    Boa noite, julianovv

    Pode executar a consulta
    UPDATE tbl_PVE LEFT JOIN tbl_CVE ON tbl_PVE.CampoARelacionar=tbl_CVE.CampoARelacionar SET CVE='CVE' & Mid(PVE,4);
    julianovv
    julianovv
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 638
    Registrado : 14/12/2010

    [Resolvido]Copiar dados de um campo para outro e substituir parte dos dados Empty Re: Copiar dados de um campo para outro e substituir parte dos dados

    Mensagem  julianovv 7/12/2011, 10:42

    O formulário utilizado para PVE é baseado na tabela de mesmo nome e por enquanto não pensei em consulta. Eu precisava que ao clicar na caixa de opção CVE, a descrição PVE001 fosse copiada para a tabela CVE alterando para CVE001.
    Pensei em um código na caixa de opção (chek box), no evento "ao atualizar".

    Rolling Eyes
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Copiar dados de um campo para outro e substituir parte dos dados Empty Re: [Resolvido]Copiar dados de um campo para outro e substituir parte dos dados

    Mensagem  Alexandre Neves 7/12/2011, 11:12

    Então, o código do Criquio servir-lhe-á
    julianovv
    julianovv
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 638
    Registrado : 14/12/2010

    [Resolvido]Copiar dados de um campo para outro e substituir parte dos dados Empty Re: Copiar dados de um campo para outro e substituir parte dos dados

    Mensagem  julianovv 7/12/2011, 13:45

    As duas dicas foram anotadas e serão bem aproveitadas posteriormente.
    Obrigado!

    Wink

      Data/hora atual: 26/1/2022, 23:28