Вниз
Скачать: CL | DM;

Работа с 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); // закрыли книгу
...
прекрасно работает


← →
AFrolov ©   (2002-10-07 14:55) [6]

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


← →
andrey_pst ©   (2002-10-07 15:27) [7]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c
3-55943
alenka
2002-09-22 23:27
2002.10.17
Хорошая книга по БД


3-56019
saxon
2002-09-25 18:30
2002.10.17
TTable.Refresh


14-56304
Ag2002
2002-09-24 10:43
2002.10.17
Окно CPU


1-56157
Брат
2002-10-07 12:05
2002.10.17
Люди, как перехватить событие минимизации и максимизации окна?


1-56058
Константин
2002-10-08 12:57
2002.10.17
Как создать собственный тип данных, не основанный на стандартных




   Наверх