VBA. Данные Access -> Excel.
От: STTN http://www.vpcom.ru
Дата: 26.09.03 20:56
Оценка:
Мне нужно взять программно информацию из базы Access в Excel. То есть в проекте Excel открыть базу Access и взять данные. Как?
Re: VBA. Данные Access -> Excel.
От: Аноним  
Дата: 29.09.03 06:16
Оценка:
Здравствуйте, STTN, Вы писали:

STT>Мне нужно взять программно информацию из базы Access в Excel. То есть в проекте Excel открыть базу Access и взять данные. Как?


Используй ADO или DAO. Всё делается стандартно. Создай объектные переменные и присвой им:
для ADO — ADODB.Connection и из него бери Recordset
для DAO — DAO.DBEngine.36 и из него бери Database и Recordset

Вроде всё... Ах да.. маленький примерчик

'-== ADO ==-
Dim cnConn As Object
Dim rsRecset As Object

Set cnConn = CreateObject("ADODB.Connection")
'
'Ну там укажи ConnectionString и остальную лабуду
'
Set rsRecset = cnConn.Execute(SQLorTableName)


'-== ADO ==-
Dim dbe As Object
Dim db As Object
Dim rs As Object

Set dbe = CreateObject("DAO.DBEngine.36")
Set db = dbe.Opendatabase(DBName)
Set rs = db.OpenRecordset(SQLorTableName)


Удачи.
Re[2]: VBA. Данные Access -> Excel.
От: free stranger Россия  
Дата: 29.09.03 06:19
Оценка:
Упс... Что-то меня под анонимом закинуло....

Сорри за ОффТоп
The darkness around me
Shores of solar sea
Oh how i wish to go down with the sun....
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.