Работа в Excel из Access

[kuznetsovSergey]

Добрый день!

Помогите решить вопрос, мне кажется он не составит много хлопот

Есть макрос в Excel, точнее несколько макросов, которые обрабатывают данные, и довольно четко структурирую результат.
Есть VBA код в Access, который забирает эту структуру, и импортирует её в определенную таблицу.

Вопрос:
Как можно объединить эти 2 кода VBA? что бы при нажатии кнопки в Access, макрос сначала выполнялся который написан в Excel, а потом сразу же выполнялся импорт?

p/s. Макросы в екселе очень завязаны на екселевские библиотеки, используют и формулы, и функции екселя. Как то можно быстро произвести перенос кода, без особых потерь, и корректировки кода?

[Naeel Maqsudov]

Так надо взять всю логику и перекинуть в access.

Код: Выделить всё

Dim xlApp, xlBook, xlSheet
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open("1.xls")
Set xlSheet = xlBook.Worksheets(1)

[kuznetsovSergey]

Спасибо , Naeel Maqsudov !

Так надо взять всю логику и перекинуть в access.

Код: Выделить всё

Dim xlApp, xlBook, xlSheet
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open("1.xls")
Set xlSheet = xlBook.Worksheets(1)
 

Я так понимаю, тут всё будет совсем не просто ... как я думал, весь код переписывать под логику Access ... Прийдется учиться писать макросы и тут ...