Valeu Waldir agora veio!!!
Sinceramente não entendi onde estava o erro!!!
A primeira parte do rs.open ... = '" & busca & "' And <>" & i , conn , etc
era a que não dava certo e eu ja tinha tentado desta forma???
A segunda parte, valeu eu nao tinha testado ainda pois a rotina não entrava la!!!
Quanto a salvar depois de testar, não sei se é erro do vb ou erro da minha lógica mas sempre que eu coloco rs.addnew , , , rs.update dentro de um if ele não salva.
Tinha o projeto completinho mas em função da urgência eu não documentei e não achava o erro.
Preferi recomeçar. Mas deu o erro novamente e eu troquei a lógica.
Funcionou e eu aderi a ela mesmo achando que não era a forma mais adequada.
De qualquer forma valeu mesmo a ajuda, me salvaste de uma bela dor de cabeça!! Té mais Waldir.
