我正在尝试使用 VBA 解析文本文档并返回文本文件中给出的路径。例如，文本文件如下所示：
*Blah blah instructions
*Blah blah instructions on line 2
G:\\Folder\...\data.xls
D:\\AnotherFolder\...\moredata.xls
我希望 VBA 一次加载 1 行，如果它以*然后移至下一行（类似于正在注释的该行）。对于具有文件路径的行，我想将该路径写入单元格，例如A2对于第一条路径，B2对于下一个，等等。
我希望得到回答的主要问题是：
- 使用 VBA 读取文本文件的最佳/简单方法是什么？
- 我怎样才能一行一行地做到这一点？
对于文本文件的最基本读取，请使用open
example:
Dim FileNum As Integer
Dim DataLine As String
FileNum = FreeFile()
Open "Filename" For Input As #FileNum
While Not EOF(FileNum)
Line Input #FileNum, DataLine ' read in data 1 line at a time
' decide what to do with dataline,
' depending on what processing you need to do for each case
Wend
#作者注 - 请停止添加close #FileNum- 它在评论中得到解决，并且不需要作为对此答案的改进
本文内容由网友自发贡献，版权归原作者所有，本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容，请联系:hwhale#tublm.com(使用前将#替换为@)
