Есть пустая таблица из двух полей в mdb файле.
Есть txt файл - записи в строках разделены запятой
Есть ли способ экспортировать этот txt файл в таблицу?
Dim rs As Recordset, FN As Integer, L As String
Set rs = ...
FN = FreeFile
Open "..." For Input As #FN
Do Until EOF(FN)
Line Input #FN, L
rs.Add
rs.Fields(0) = Split(L,",")(0)
rs.Fields(1) = Split(L,",")(1)
rs.Update
Loop
Close #FN
rs.Close
Set rs = Nothing
Сейчас этот форум просматривают: Google-бот и гости: 1