Форум: "Основная";
Текущий архив: 2002.10.17;
Скачать: [xml.tar.bz2];

Вниз

Работа с 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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.008 c