Excel批量导入TXT数据问题

chuyuchun

excel还能这样玩 不错

众叛亲离

首先谢谢版主共享这么好的一个程序！想问一下，就是我的数据不是以“|”为做分隔符的，请问这个怎么处理好？谢谢

方漠

选固定宽度就可以了.以下是你的文件打开时录的代码.

    Workbooks.OpenText Filename:="D:\test.txt", Origin:=936, StartRow:=1, _
        DataType:=xlFixedWidth, FieldInfo:=Array(Array(0, 1), Array(17, 1), Array(82, 1) _
        ), TrailingMinusNumbers:=True

众叛亲离

是固定宽度可以没错，想批量！请问要代替前面那个的哪一段！请指点

方漠

With  .... END WITH 中间那一段参数,具体需要你自己逐个将参数替换尝试一下.

...
.TextFileParseType = xlDelimited
....