vba get text file content
' Returns an array of lines from a text file
Function FileInArray() As Variant
Dim fileSO As Object, textFile As Object, content
On Error GoTo CExit
Set fileSO = CreateObject("Scripting.FileSystemObject")
Set textFile = fileSO.OpenTextFile("C:tempfile.txt", 1)
content = textFile.ReadAll
FileInArray = Split(content, vbNewLine)
textFile.Close
CExit:
End Function