Бабин Виктор Васильевич:
Если требуется нетривиальное решение, можно воспользоваться доступом к CSV-файлу как к БД через ODBC.
Или, как предложил PsySex, загнать файл в промежуточный массив и оттуда парсить строки на элементы.
Open "1.CSV" For Output As #filenumber
For Each myn In str_()
Write #filenumber, myn
Next
Close #filenumber
Так загоняется файл как текстовый построчно в промежуточный массив. А дальше - дело техники.
p.s. Читайте help, народ старался ведь.