VBA - Check CSV file format without opening file?

[ShawnPCooke]

I'm automating the import of a particularly large CSV file. This file is generated by the user, and I want to validate that it is in the correct format (column order & names) before continuing the macro.

Ideally, I'd like to read the header row from the file before committing to opening the whole thing. Is there a way in VBA to read the first N characters from a text file before opening the whole file?

I already tried opening the file for text I/O, and just reading the first line, but that took longer than just importing the thing.

Thank you!

 

[ShawnPCooke]

Never mind... I figured it out myself. For those who come after me, here's how I did it.

First, I made a reference to Microsoft Scripting Runtime. That gave me access to the FileSystemObject object and the TextStream object.

Dim fso as FileSystemObject
Dim txtStream as TextStream
Dim strFilename as string
Dim strText as string

strFilename = "C:\filepath-goes-here"
Set fso = New FileSystemObject
Set txtStream = fso.OpenTextFile(strFilename, ForReading, False)
strText = txtStream.ReadLine
txtStream.Close

The first line was then contained in strText, and I could check that. Runs super quick.