Still my problem is not solved. How do i know the
End of file. i am reading the whole file and writing to another with different name and some changes. How could i use this code and know the end of file.
i = Replace(file, vbCrLf, "")

Thanks