![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
|
|
#1
|
|||
|
|||
|
Здравствуйте!
Как запустить макрос через Delphi(предположим, по нажатию кнопки) в документе Word? Что то ни в одном учебнике не нашел ничего похожего. Есть документ a.doc. Как, войдя в него, запустить макрос abc. Как войти, я знаю, естественно. И еще, как узнать количество страниц в документе?Хотя, может, это уже VBA... Заранее благодарен. |
|
#2
|
||||
|
||||
|
вот
Код:
procedure TForm1.Button3Click(Sender: TObject);
var
xlapp: Variant;
begin
XLApp:= CreateOleObject('Excel.Application');
XLApp.Visible:=true;
XLApp.WorkBooks.open(ExtractFilePath(ParamStr(0))+'1.xls');
xlapp.run('1.xls'+'!Макрос1');
end;Последний раз редактировалось pesi, 24.06.2009 в 18:57. |
|
#3
|
|||
|
|||
|
Спасибо большое.
|