So far, didn't do much. I'm stuck on how to find a search method.
Sub CSVFileSearch()
Dim FilePath As String
FilePath = "example.csv"
Open FilePath For Input As #1
Do Until EOF(1)
Line Input #1, LineFromFile
lineitems = Split(LineFromFile, ",")
Debug.Print lineitems(0)
Loop
Close #1
End Sub