VBA导入txt出现报错 vba代码输入超出文件尾

这个错误通常是因为读取文本文件时，读取的行数超出了文本文件的行数。可以在读取文本文件之前，使用以下代码获取文本文件的行数：

Open "C:\test.txt" For Input As #1
Dim i As Integer
i = 0
Do Until EOF(1)
    Line Input #1, sLine
    i = i + 1
Loop
Close #1

其中，"C:\test.txt"是文本文件的路径，i就是文本文件的行数。可以把i保存在一个变量中，在读取文本文件时，设置一个循环，读取i行即可。