Перенос данных из файла Excel в файл доступа с помощью VB6

Question

Дорогие все, У меня есть файл Excel (.xls) с данными в первом листе, который называется «Клиенты». У меня также есть база данных Access.mdb, которая содержит таблицу с именем «CustomerDetails». Я хотел бы перенести данные из таблицы Excel в базу данных Access, используя код VB6. Как я могу это сделать? Заранее спасибо,

Answer 1

пройти через это http://office.microsoft.com/en-ca/access-help/import-export-and-link-data-between-access-and-excel-HP001095095.aspx

Answer 2

это довольно просто сделать, просто поместите приведенный ниже код в модуль в Access, и он автоматически импортирует его для вас. Если вам нужен код для запуска, вы можете поместить его в form_open или что-то подобное. Вы даже можете запустить его с командным файлом.

Function import()

basedir = "INSERT YOUR SPREADSHEET HERE"

DoCmd.TransferSpreadsheet _
            acImport, _
            acSpreadsheetTypeExcel9, _
            "TABLE NAME HERE", _
            basedir, _
            False
End Function

Answer 3

Можно ли использовать Access для импорта таблицы из Excel?

Если нет, и вам нужно сделать это в VB, вам нужно либо открыть файл Excel в VB, либо экспортировать из Excel в формат CSV и открыть его, а затем записать данные в существующую таблицу Access.