| Voldemar |
| Отправлено: 08.12.2003, 15:56 |
|
Не зарегистрирован
|
пробовал так:
Variant WordB=Variant::CreateObject("Word.Basic");
или
Variant WordB=Variant::CreateObject("Word.Application");
//открываю файл, в файле прописан макрос "main_propis"
.....
try
{
WordB.OleProcedure("Run","main_propis");
}
catch(EOleSysError &e){ShowMessage(e.Message);}
WordB.OleProcedure("Close");
WordB.Clear();
выдает сообщение :"Unknown name".
|
|
| Gedeon |
| Отправлено: 08.12.2003, 17:19 |
|
Ветеран
Группа: Модератор
Сообщений: 1742
|
Мне удалсь выполнить запуск макроса только с помощью компонент с палитры Office2k, поищи в поиске тут это обсуждалось, я думаю так тоже можно, но сейчас честно говоря нет времени покопаться, мож появится позже, попробую помочь.
|
|
| ** pasha |
| Отправлено: 08.12.2003, 18:11 |
|
Не зарегистрирован
|
В разделе "Уроки" по Excel часть 3:
| CODE |
App.OleProcedure("Run","MyMacros1");
|
Думаю что в Word также.
Также, возможно, у Вас отключено выполнение
макросов (запрещено) ,
надо зайти в него и включить (разрешить)
| QUOTE |
выдает сообщение :"Unknown name".
|
А вы уверены что макрос с этим именем точно есть ?
Попробуйте выполнить его из Word.
|
|
| ** laifik |
| Отправлено: 09.12.2003, 10:01 |
|
Не зарегистрирован
|
Запуск макроса из Билдера
//Запуск макроса в шаблоне
WideString macrw("ArhStr");
// А это собственно запуск самого макроса
WordApp-> Run(macrw.c_bstr(),
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam);
//ArhStr — название макроса
 |
|
|
