При импорте файла CSV в Excel текст преобразуется в число
Я импортирую файл CSV в электронную таблицу Excel 2010, используя что-то вроде этого:
Set wb = Workbooks.Open(Filename:=myFile, ReadOnly:=True, Notify:=False)
Set ws = wb.Worksheets(1)
Set rRng = ws.Range("A" & CStr(iFirstDataRow) & ":" & "G" & CStr(iLastRow))
rRng.Columns(2).NumberFormat = "@"
'copy file on sheet ws1
ws1.Cells.Clear
rRng.Copy ws1.Cells(1, 1)
проблема в том, что один из столбцов содержит номера редакций, которые выглядят следующим образом в файле CSV:
0.0
1.0
2.2
2.20
После импорта я получаю:
0
1
2.2
2.2
потому что текст был преобразован в числа.
Как я могу это остановить?
Спасибо, М.Р.
Обновить:
использование метода Opentext также не работает:
Workbooks.OpenText Filename:=sFile, Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited, Tab:=False, Semicolon:=False, Comma:=True, Space:=False, Other:=False, FieldInfo:=Array(Array(1, xlMDYFormat), Array(2, xlTextFormat))
По какой-то причине параметр FieldInfo игнорируется