Работа с Excel

← →
imppuf (2002-10-07 12:24) [0]

Как программно выполнить свой макрос в Excel

← →
andrey_pst © (2002-10-07 12:41) [1]

IExcelWB.RunAutoMacros(Which : TOleEnum, lcid : integer)

← →
imppuf (2002-10-07 12:49) [2]

А что означают параметры?
Если,можно маленький пример.

← →
andrey_pst © (2002-10-07 12:56) [3]

не делал такого ни разу с примером не подскажу, однако:

lcid - это константа, можно передавать 0, а можно описать ее так:
const xlLCID = LOCALE_USER_DEFAULT;
я последним случаем пользуюсь.

Which - похоже событие, при котором срабатывает макрос

← →
AFrolov © (2002-10-07 13:12) [4]

Excel:=CreateOleObject("....");
Excel.Run("имя макроса",{параметры до 32 штук});
В офисе 97 параметры передавать нельзя.

← →
andrey_pst © (2002-10-07 14:02) [5]

>>AFrolov
>>В офисе 97 параметры передавать нельзя.
не согласен

... IExcelApp : Excel97._Application; // интерфейс сервера IExcelWB : Excel97._Workbook; // интерфейс книги ... IExcelApp := CoExcelApplication.Create; IExcelApp.Visible[xlLCID] := true; ... IExcelWB.SaveAs(Directories + "AccountInvoice.xls", EmptyParam, EmptyParam, EmptyParam, false, false, xlNoChange, EmptyParam, false, EmptyParam, EmptyParam, xlLCID); // сохранили книгу IExcelWB.Close(true, Directories.xls", false, xlLCID); // закрыли книгу ...прекрасно работает

Параметры нельзя использовать при вызове макросов.

>>Which - похоже событие, при котором срабатывает макрос
Пардон, тормознул, это имя макроса

Работа с Excel Найти похожие ветки