Mah, prova a fare:

codice:
str = replace(str, "[*]"& VbCrLf, "[*]")
Roby