replace og access

Jeg indtaster tekst i et textarea, heriblandt linieskift. Teksten indsættes i access tabel.
Når jeg trækker teksten ud igen herfra ønsker jeg at replace linieskift som er efterfulgt af teksten (m1) med </p><h3>.
Jeg har prøvet dette:
i_tekst_kvt = Replace(i_tekst_kvt,Chr(13),\"<br>\")
i_tekst_kvt = replace(i_tekst_kvt,\"<br>(ml1)\",\"</p><h3>\")
kan nogen hjælpe mig, det virker desværre ikke

mvh fjot