[问题] 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