Ce site est optimisé pour être consulté depuis un navigateur moderne dans lequel JavaScript est activé.

Read/Parse text fichier line by line dans VBA

ayi

I’m trying to parse a text document using VBA and return the path given in the text file. For example, the text file would look like:
<pre><code class="lang-auto">*Blah blah instructions
*Blah blah instructions on line 2
G:\Folder...\data.xls
D:\AnotherFolder...\moredata.xls

</code></pre>
I want the VBA to load 1 line at a time, and if it starts with a <code>*</code> then move to the next line (similar to that line being commented). For the lines with a file path, I want to write that path to cell, say <code>A2</code> for the first path, <code>B2</code> for the next, etc.
The main things I was hoping to have answered were:
<ul>
<li>
What is the best/simple way to read through a text file using VBA?
</li>
<li>
How can I do that line by line?
</li>
</ul>

ayi_2

for the most basic read of a text file, use <code>open</code>
example:
<pre><code class="lang-auto">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

</code></pre>
#Author note - Please stop adding in <code>close #FileNum</code> - it’s addressed in the comments, and it’s not needed as an improvement to this answer