Hi,

at first glance

(Chr(13)) or carriage return-linefeed (Chr(13) + Chr(10))

sDelim can't be this or that.

If Right(strLine, 1) < Chr(13) and
Right(strLine, 2) < (Chr(13) & Chr(10) then


--
Greetings from Bavaria, Germany

Helmut Weber, MVP WordVBA

Win XP, Office 2003
"red.sys" & Chr$(64) & "t-online.de"