Tror detta ska funka.
När du splittar på vbCrLf tas detta även bort så din replace har inget att byta ut.
Det är inte heller säkert att din split funkar. Det beror på om du har \r\n eller bara \n som radavslut. Du kan testa att spitta på Chr(13) i stället om det inte funkar.
<% Dim Obj
Set...