Импорт таблиц Excel в одну таблицу Access

@Dr.Kolbaskin · Регистрация: 07.11.2010

Author24 — интернет-сервис помощи студентам

подскажите, пожалста, как импортить данные из разных книг excel в одну (!) таблицу ассess??
Пишу так:

Visual Basic

Sub ImportAll()
 
Dim name As String
Dim MyPatch As String
 
name = Dir('O:files ')
Do Until name = ''
    Debug.Print name
 
MyPatch = 'O: ' & name & ''
 
DoCmd.TransferSpreadsheet acImport, 8, aaa, MyPatch, True, ''
 
Loop
 
End Sub

Но так нужно вместо ааа каждый раз задавать другое имя, потому что он создает таблу, а не добавляет в старую...

@Ирча · 24.01.2011, 09:27

Если это для того, чтобы все таблицы слить в одну, то посмотри
http://www.sql.ru/forum/actualthread.aspx?tid=138332
Я сегодня там решала эту задачу слияния всех таблиц базы в одну все получилось

@Dr.Kolbaskin · 24.01.2011, 09:31 **[ТС]**

я поступил немного проще - у меня данные берутся из таблиц excel - так вот я импортил не в разные таблицы, а просто в одну. Т.е. перебрал все файлы в директории и загонял в одну таблу.
спсибо.

@Ирча 0 / 0 / 0 Регистрация: 08.02.2010 Сообщений: 345
	24.01.2011, 09:27	2
	Если это для того, чтобы все таблицы слить в одну, то посмотри http://www.sql.ru/forum/actualthread.aspx?tid=138332 Я сегодня там решала эту задачу слияния всех таблиц базы в одну все получилось 0

@Dr.Kolbaskin 0 / 0 / 0 Регистрация: 07.11.2010 Сообщений: 91
	24.01.2011, 09:31 [ТС]	3
	я поступил немного проще - у меня данные берутся из таблиц excel - так вот я импортил не в разные таблицы, а просто в одну. Т.е. перебрал все файлы в директории и загонял в одну таблу. спсибо. 0