MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    Método similar a procv utilizando vba

    Compartilhe

    lsdtampi
    Novato
    Novato

    Respeito às Regras 75%

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

    Método similar a procv utilizando vba

    Mensagem  lsdtampi em Qui 16 Out 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
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: Método similar a procv utilizando vba

    Mensagem  Alexandre Neves em Qui 16 Out 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

    lsdtampi
    Novato
    Novato

    Respeito às Regras 75%

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

    Re: Método similar a procv utilizando vba

    Mensagem  lsdtampi em Ter 21 Out 2014, 15:41

    Vlw mesmo cara, salvou o dia aqui Very Happy

    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: Método similar a procv utilizando vba

    Mensagem  Alexandre Neves em Ter 21 Out 2014, 15:59

    Boa tarde,
    Marque o tema por "Resolvido"
    Lembre-se destes assuntos:
    [Você precisa estar registrado e conectado para ver este link.] (a aguardar resposta sua desde 15-08-2014)
    [Você precisa estar registrado e conectado para ver este link.] (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
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: Método similar a procv utilizando vba

    Mensagem  Alexandre Neves em Qui 05 Fev 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

      Data/hora atual: Qua 07 Dez 2016, 20:08