Мне нужно взять программно информацию из базы Access в Excel. То есть в проекте Excel открыть базу Access и взять данные. Как?
Здравствуйте, 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)
Удачи.
Упс... Что-то меня под анонимом закинуло....
Сорри за ОффТоп