Этот код для импорта нескольких CSV-файлов в MS Access работает у меня очень хорошо:Импорт большого количества .csv-файлов в Access
Единственное, что я хотел бы добавить, это импортная спецификация, которая импортирует каждое поле как КОРОТКИЙ ТЕКСТ. У меня есть спецификация, сохраненная как "GPS1", но я не знаю, как добавить ее в код пакетного импорта.
Я пробовал это
docmd.RunSavedImportExport ("GPS1")
но не повезло.
решение1
В примере кода есть строка...
DoCmd.TransferText acImportDelim, , strTable, strPathFile, blnHasFieldNames
Просто добавьте спецификацию импорта в эту строку...
DoCmd.TransferText acImportDelim,"GPS1" , strTable, strPathFile, blnHasFieldNames