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


2 participantes

    [Resolvido]String para localizar dados e substituir

    avatar
    vaggnersf
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 47
    Registrado : 30/07/2012

    [Resolvido]String para localizar dados e substituir Empty String para localizar dados e substituir

    Mensagem  vaggnersf 30/7/2012, 03:43

    Pessoal existe alguma string que possa roda para que seja trocado alguns numeros de uma tabela que tenho.

    Exemplo da tabela1
    1º campo tenho a data
    2º tenho numeros
    3º tenho textos

    entao ficaria assim
    01/01/2012|55|lançamento
    02/02/2012|10|teste
    25/02/2012|15|lançamento
    06/05/2012|55|lançamento

    exemplo da tabela2
    36|lançamento
    58|teste


    entao vou criar um novo campo na tabela1 e direto da tabela1 vai fazer uma consulta na tabela2 por texto se tiver o texto da tabela2 igual da tabela1 entao vai me trazer o numero que esta na frente da tabela2 para a tabela1

    ficaria assim
    01/01/2012|55|lançamento|36
    02/02/2012|10|teste|58
    25/02/2012|15|lançamento|36
    06/05/2012|55|lançamento|36
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]String para localizar dados e substituir Empty Re: [Resolvido]String para localizar dados e substituir

    Mensagem  JPaulo 30/7/2012, 12:08

    Ola Vagner, seja bem vindo ao fórum;

    Você pode fazer o simples;

    Crie o novo campo numerico na tabela1.

    Crie uma consulta nova em modo SQL, cole e altere para os nomes corretos;


    UPDATE tabela1 AS t, [SELECT * FROM Tabela2]. AS h
    SET t.NovoCampo = h.CampoNumero
    WHERE (((t.[CampoTexto])=h.[CampoTexto]));



    Por VBA

    Dim strSQL As String
    strSQL = "UPDATE Tabela1 AS t, (SELECT * FROM Tabela2) AS h Set t.NovoCampo = h.CampoNumero WHERE t.CampoTexto=h.CampoTexto"
    DoCmd.RunSQL (strSQL)


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]String para localizar dados e substituir Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]String para localizar dados e substituir Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]String para localizar dados e substituir Folder_announce_new Instruções SQL como utilizar...
    avatar
    vaggnersf
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 47
    Registrado : 30/07/2012

    [Resolvido]String para localizar dados e substituir Empty Re: [Resolvido]String para localizar dados e substituir

    Mensagem  vaggnersf 4/8/2012, 21:28

    Obrigado

    Conteúdo patrocinado


    [Resolvido]String para localizar dados e substituir Empty Re: [Resolvido]String para localizar dados e substituir

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/3/2024, 08:26