Método similar a procv utilizando vba

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"


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

Vlw mesmo cara, salvou o dia aqui

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

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.