在VBA中逐行读取/分析文本文件

Question

在VBA中逐行读取/分析文本文件我试图使用VBA解析一个文本文档，并返回文本文件中给出的路径。例如，文本文件如下所示：*Blah blah instructions*Blah blah instructions on line 2G:\\Folder\...\data.xls D:\\AnotherFolder\...\moredata.xls我希望vba一次加载1行，如果它以*然后移到下一行(类似于被注释的行)。对于具有文件路径的行，我希望将该路径写入单元格，例如A2第一条路，B2为下一个等。我希望能回答的主要问题是：1.使用VBA读取文本文件的最佳/简单方法是什么？2.我怎样才能一条条地做到这一点？

Answer 1

对于文本文件的最基本读取，请使用open

例子：

Dim FileNum As IntegerDim DataLine As StringFileNum = FreeFile()Open "Filename" For Input As #FileNumWhile 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 caseWend