Excel has built-in options to read files where fields are delimited by tabs, semicolons, commas, or spaces.
Sub Main()
Workbooks.OpenText Filename:= "C:\sales.txt", Origin:=437, DataType:=xlDelimited, Other:=True, OtherChar:= "|", FieldInfo:=...
End Sub
Related examples in the same category