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

    Método similar a procv utilizando vba

    avatar
    lsdtampi
    Novato
    Novato


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 5
    Registrado : 23/03/2014

    Método similar a procv utilizando vba Empty Método similar a procv utilizando vba

    Mensagem  lsdtampi 16/10/2014, 14:56

    Seguinte, tava querendo fazer uma comparação entre duas colunas de tabelas diferentes para encontrar operações repetidas, fiz um algoritmo aqui, funcionou, mais demora muito, porque são várias operações, gostaria de saber se alguém sabe um método mais rápido de fazer essa comparação.

    Abaixo segue o codigo

    Código:

    Dim db As Database
    Dim rs As Recordset
    Dim ds As Recordset

    Set db = CurrentDb
    Set rs = db.OpenRecordset("SELECT [TESTE].* FROM [TESTE]")
    Set ds = db.OpenRecordset("SELECT [COMPARACAO].* FROM [COMPARACAO]")
        
        Do Until rs.EOF
            Do Until ds.EOF
             If rs!OPERACAO = ds!OPERACAO Then
                
                rs.Edit
                rs!comparacao = True
                rs.Update
            
             End If
             ds.MoveNext
            Loop
           rs.MoveNext
          
           If rs.EOF Then
            GoTo final
           End If
          
           ds.MoveFirst
          
        Loop
            
                
    final:
     
     MsgBox "Comparação Realizada com sucesso"
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    Método similar a procv utilizando vba Empty Re: Método similar a procv utilizando vba

    Mensagem  Alexandre Neves 16/10/2014, 17:29

    Boa tarde,
    execute a consulta
    UPDATE Teste LEFT JOIN Comparacao ON Teste.Operacao=Comparacao.Operacao SET Comparacao=true


    .................................................................................
    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
    avatar
    lsdtampi
    Novato
    Novato


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 5
    Registrado : 23/03/2014

    Método similar a procv utilizando vba Empty Re: Método similar a procv utilizando vba

    Mensagem  lsdtampi 21/10/2014, 15:41

    Vlw mesmo cara, salvou o dia aqui Very Happy
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    Método similar a procv utilizando vba Empty Re: Método similar a procv utilizando vba

    Mensagem  Alexandre Neves 21/10/2014, 15:59

    Boa tarde,
    Marque o tema por "Resolvido"
    Lembre-se destes assuntos:
    http://maximoaccess.forumeiros.com/t18117-excecucao-de-macro-via-vba#134455 (a aguardar resposta sua desde 15-08-2014)
    http://maximoaccess.forumeiros.com/t20091-duvida-travar-botoes#148252 (a aguardar resposta sua desde 15-08-2014)

    Temos de respeitar os colegas que se esforçaram em ajudar (não apenas os que responderam), manter o fórum organizado e ajudar outros que tenham a mesma dúvida.

    Ficamos a aguardar


    .................................................................................
    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
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    Método similar a procv utilizando vba Empty Re: Método similar a procv utilizando vba

    Mensagem  Alexandre Neves 5/2/2015, 10:57

    Bom dia,
    Por não ter dado importância ao alerta e teve várias participações posteriores, a sua classificação baixou para 75%.
    Aguardamos que dê seguimento ao alerta já formulado para mantermos o fórum organizado.


    .................................................................................
    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

    Conteúdo patrocinado


    Método similar a procv utilizando vba Empty Re: Método similar a procv utilizando vba

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 18:18