Duas consideraçoes:
1) Não use o = pra conparar strings... so pra numeros... pra strings usa o LIKE... nao vou te explicar a diferença aqui, se vc quizer detalhes, pergunta depois... o importante é vc usar o LIKE para comparar strings...
2) o parametro do metodo Find ("criteria") é uma string no formato SQL... vc deve preenchela assim:
->supondo q vc procura nomes começados com "A"
Data1.Recordset.FindNext "nome LIKE 'A%'"
Observe os apostrofos em torno do valor, bem como q a linha toda esta entre aspas
-> supondo q o valor q vc deseja comparar esta em uma string (chamada valor):
Data1.Recordset.FindNext "nome LIKE '" & valor & "'"
Observe q os apostrofos continuam, se vc esquecer deles, nao vai funcionar...
Ah, mais uma coisa, se for usar curingas, lembre-se disso: Se vc usa ADO, o curinga é o sinal de porcentagem (%), ja se usa DAO ou DATA (seu caso) o curinga é o asterisco (*)... se vc inverter, talvez nao funcione.. eu nunca inverti pra saber o q acontece...
Espero ter te ajudado...