Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.17;
Скачать: 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 вся ветка

Текущий архив: 2002.10.17;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.023 c
1-56027
danilka
2002-10-08 09:29
2002.10.17
Как в 5-х дельфях отследить добавление на форму MDIChild?


3-55974
antoniz
2002-09-25 16:06
2002.10.17
Как перхватить соощение об ошибке ADO


1-56040
dimon79
2002-10-08 11:48
2002.10.17
FormPaint


1-56050
Gaber
2002-10-08 13:11
2002.10.17
Возможно ли в одном Label1.Caption ввести текс в 2 строки


1-56190
Демонов Е.В.
2002-10-07 16:32
2002.10.17
Вопрос о файлах