Duncan,

Thanks for your help! This is only typing mistake.

I have found the solution, using Put/Get instead of Write/Input

NC

"DNF Karran " ¦b¶l¥ó
¤¤¼¶¼g...
Shouldn't
For i = 0 To 4
Write #1, Ar() ' <--- Error found
Next

be
For i = 0 To 4
Write #1, Ar(i) ' <--- Error found
Next

?

Duncan


---
Message posted from http://www.ExcelForum.com/