Erro em codigo 3464

Olá a todos, mais uma vez vou precisar da ajuda dos colegas, estou tentando gerar um arquivo e esta dando Erro em tempo de execução “3464”

Estou postando um exemplo do meu arquivo com o código para a geração.

A única coisa que meu arquivo faz uma comparação da TBL_teste , campo6 com a TBL_teste1, campo5

Ola;

Tem de colocar aspas simples, uma vez que o CAMPO6 é texto;

Set Rs2 = CurrentDb.OpenRecordset("SELECT * FROM TBL_TESTE1 WHERE CAMPO5 = '" & Rs1!CAMPO6 & "'")