[問題] VBA讀文字檔的一些問題

作者: lag1056 (polovoe)   2017-11-22 11:35:03
(若是和其他不同軟體互動之問題 請記得一併填寫)
板上的各位高手好
版本:Excel 2007
小弟最近用excel vba寫了一個產出報表的功能
但其中有一段不知道該怎麼寫 就去向IT部門的同事求救
結果他沒幾下就幫我寫好了 留下一臉困惑的我
我主要是想利用EXCEL讀TXT檔 並加工做整理
我有逐行跑過那位同事寫的 他會把TXT檔中的文字一行一行讀出來
我想請問他這種寫法的意思是什麼
以下附上程式碼:
sheets("文字檔").select
i = 1
X = TXT1 (TXT1是讀取這個檔案的路徑)
open X for input as #1 (這行開始就看不懂了)
do until EOF(1) (求解EOF(1)是什麼...)
line input #1, X
cells(i, 1) = X
i = i + 1
loop
close #1
感謝各位大大耐心讀完 請救救小弟
作者: soyoso (我是耀宗)   2017-11-22 11:40:00
open statement語法,msdn有說明 https://goo.gl/uG6KJ3eof function的部分 https://goo.gl/k9p4cvline input statement https://goo.gl/qaohrm
作者: lag1056 (polovoe)   2017-11-22 13:35:00
感謝大大~雖然我看不太懂 哈哈哈
作者: newton41 (Newton)   2017-11-22 14:17:00
EOF 大概是 end of file , EOF(1) 裡面的1 是前面 As1 代表那個檔案更正 as #1Do until EOF(1) loop 就是一直做到這個檔案的最終的迴圈
作者: lag1056 (polovoe)   2017-11-23 13:34:00
感謝大大 我有點懂這個在幹嘛了

Links booklink

Contact Us: admin [ a t ] ucptt.com