Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Макрос в Excel [D5, Win95/98, Win2k]

Forrest1 © (2002-02-08 14:55:00)
Подскажите, плиз! Как передать параметры из delphi в Макрос на VBA. Пишу следующее:

var
wrkBook,Ex :variant;
begin
Ex:=CreateOleObject("Excel.Application");
Ex.Application.EnableEvents:=False;
wrkBook:=Ex.WorkBooks.Add("E:\Reports\Trauma.xls");
ex.Run("Trauma.Trauma("+IntToStr(PO.PostId)+","+IntToStr(PO.SbEntId)+")");
Но это не правильно, т.к. в VBA должна быть главная процедура без параметров насколько я понимаю, а уже из неё должна вызываться процедура с параметрами.
Как быть??? Спасибо большое заранее.

P.S. Раньше я задавал похожий вопрос, но полный ответ так и не получил. Всем спасибо кто участвовал тогда в обсуждении.

Forrest1 (2002-02-12 14:59:00) [1]
to Aus:
Спасибо!! Но есть одно маленькое "но".
Дело в том, что когда я пишу макрос на VBA и передаю ему какие-то параметры, то в Excel(Сервис->Макрос) его нет, мало того он естесственно на строку
ex.Run("Trauma.Trauma",PO.PostId,PO.SbEntId)
Выдаёт сообщение, что такого макроса в помине нет.
Как быть?

aus (2002-02-12 10:44:00) [2]
Вот так должно работать, по крайней мере с целыми числами в параметрах:

ex.Run("Trauma.Trauma",PO.PostId,PO.SbEntId)

Forrest1 (2002-02-12 09:18:00) [3]
Большое спасибо. Я об этом не подумал.
Макрос с параметрами я не могу запустить естественно.
Он должен вызываться из макроса без параметров. Здесь вопросов нет.
жаль что нельзя без параметров. Хотелось красиво.

serg (2002-02-08 15:25:00) [4]
отведи для этого несколько ячеек и в них сперва записывай значения, а затем запускай макрос. он возьмет эти значения.

вообще, а ты в Excel можешь запустить напрямую макрос с параметрами? думаю, что нет...

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »