Try using split(text1,vbcrlf)

Then loop through each element iof the array. Just an idea.