Страница 1 из 1

Работа в Excel из Access

Добавлено: 03 окт 2011, 14:58
kuznetsovSergey
Добрый день!

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

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

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

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

Re: Работа в Excel из Access

Добавлено: 06 окт 2011, 03:36
Naeel Maqsudov
Так надо взять всю логику и перекинуть в access.

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

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


Re: Работа в Excel из Access

Добавлено: 06 окт 2011, 15:00
kuznetsovSergey
Спасибо , Naeel Maqsudov !
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 ... Прийдется учиться писать макросы и тут ... :(