Выполнение кода Access из Excel - Microsoft Office Access

Konstantin1970 · 11.02.2012, 19:57

Добрый день!
Буду очень признателен в помощи по следующему вопросу.
У меня есть база Access, где идет расчет скользящих средних на основе рекордсета и затем данные копируются в Excel.
Требуется чтобы из Excel к примеру по нажатию кнопки запускался бы код Access.
Как это сделать, какие объекты и методы использовать?
Спасибо!

shanemac51 · 11.02.2012, 21:41

Цитата:

Требуется чтобы из Excel к примеру по нажатию кнопки запускался бы код Access.

а почему не код Excel
чем он хуже

Konstantin1970 · 12.02.2012, 11:13

Управление интервалом сглаживания и просмотр соотвествующих графиков в Excel идет.

gluk_fm · 13.02.2012, 12:02

Как-то так:

Dim appAccess As Object, p1 As String 'p1 - параметр для передачи переменной в модуль
Set appAccess = CreateObject("Access.Application")
Application.DisplayAlerts = False
appAccess.Visible = True
Call appAccess.OpenCurrentDatabase("полн ый путь к базе Access")
appAccess.Run "имя модуля", "" & p1 & "" 'если переменная не нужна удалите всё после запятой
appAccess.Application.Quit

11.02.2012, 19:57	#1
Konstantin1970 Новичок Джуниор Регистрация: 11.02.2012 Сообщений: 2	Выполнение кода Access из Excel Добрый день! Буду очень признателен в помощи по следующему вопросу. У меня есть база Access, где идет расчет скользящих средних на основе рекордсета и затем данные копируются в Excel. Требуется чтобы из Excel к примеру по нажатию кнопки запускался бы код Access. Как это сделать, какие объекты и методы использовать? Спасибо!

12.02.2012, 11:13	#3
Konstantin1970 Новичок Джуниор Регистрация: 11.02.2012 Сообщений: 2	Запуск кода Access Из Excel Управление интервалом сглаживания и просмотр соотвествующих графиков в Excel идет.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Выполнение PHP кода	Sprat	PHP	1	31.01.2012 15:12
Выполнение кода было прервано	Ципихович Эндрю	Microsoft Office Word	2	21.08.2011 14:22
Парсер, выполнение кода.	zumm	Общие вопросы Delphi	27	30.06.2010 13:29
.htaccess запрет на выполнение кода	wall66	PHP	3	11.08.2009 10:54
Выполнение кода из файла..	NSvirus	Паскаль, Turbo Pascal, PascalABC.NET	25	14.06.2009 00:56

13.02.2012, 12:02	#4
gluk_fm Форумчанин Регистрация: 09.06.2011 Сообщений: 515	Как-то так: Dim appAccess As Object, p1 As String 'p1 - параметр для передачи переменной в модуль Set appAccess = CreateObject("Access.Application") Application.DisplayAlerts = False appAccess.Visible = True Call appAccess.OpenCurrentDatabase("полн ый путь к базе Access") appAccess.Run "имя модуля", "" & p1 & "" 'если переменная не нужна удалите всё после запятой appAccess.Application.Quit