|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Выполнить макрос в документе Word
Здравствуйте!
Как запустить макрос через 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
|
|||
|
|||
Спасибо большое.
|