Question

Excel中vba怎么获取一个TXT文件的固定行数据？

如我d:\ABC.txt文件要获取固定的10行数据怎么获取？
10行里面的数据如下
a b c d
中间都是用TAB间分开，怎么分开放在不同的变量中？

Answer 1

用正则表达式，按换行符分割，取出第10行
再将取出的第10行用正则表达式以不可见字符进行分割，就可以了

Answer 2

刚才试了一下，你说的这种类型的txt好像可以直接用excel打开，所以我录了个宏，改了一下
你可以试试：

Sub 提取()
    Set zsht = ActiveSheet
    Workbooks.OpenText Filename:="d:\ABC.txt"
    Set mytxt = ActiveWorkbook
    zsht.Range("a1:d10").Value = ActiveSheet.Range("a1:d10").Value
    mytxt.Close
End Sub

这个宏是要先打开一个空表格，然后运行这个宏，会把txt当成表格打开，并A1：D10数值赋值给刚才打开的空表格

Answer 3

用数组啊，这么多数据还用变量，out了

追问

用数组可以，那怎么获取固定10行的数据呢