In poche parole non mi cicla i txt...

Legge il primo, controlla se c'è la parola da ricercare con la funzione

if InStr(s,cercaparola) > 0 then

e dopo il primo txt termina il ciclo, non facendo il controllo della pèarola negli altri txt...

Invece se levo questo parte del codice:

codice:
'CONTROLO SE TROVO LA PAROLA NELLA RIGA
  if InStr(s,cercaparola) > 0 then 
  'SE TROVO RESTITUISCO L'ID DEL TXT
    id_txt=rsDocumentazionePdf("id")
  end if
mi fa il ciclo dei txt, ma ovviamente non controlla al suo interno se c'è la parola che io sto cercando...

Cosa può essere?