Function to get first line of specified text files

[vulture49]

Hi,

I'm looking for a FUNCTION for my task as described below:

- I have numerous text files, and all their filenames/path are in column A
- I want column B to return the first line of the text file (its counterpart in column A), by using a function like =FirstLine(A2)

Is this possible? Thanks! Hoping someone could help me out. Been searching everywhere for this. All I see suggests that I import the text file into excel, which is out of the question, because these te t files are really plenty.

 

[diddi]

try this

Function GetFirstLine(MyFile As String) As String
    If Dir(MyFile) <> "" Then
        Open MyFile For Input As #1
            Line Input #1, GetFirstLine
        Close
    End If
End Function

 

[vulture49]

try this

Function GetFirstLine(MyFile As String) As String
    If Dir(MyFile) <> "" Then
        Open MyFile For Input As #1
            Line Input #1, GetFirstLine
        Close
    End If
End Function

Hey! This worked as intended!! Thank you so so so much!! It works like a gem. More power to you!!!