Как добавить кнопку в Excel с OLE

Question

Я использую метод OLE следующим образом:

var   
  xlApp, xlWorkBook, xlWorkSheet, arr: Variant; 
begin   
  xlApp := CreateOLEObject('Excel.Application');   
  xlApp.Visible := True;    
end; 

Как добавить кнопку в Excel?

А как назначить существующее марко на эту кнопку?

Где я могу найти документ Delphi-OLE-Office?

Thx.

Answer 1

Я решил это, записав макрос VBA и вставив его в свою процедуру Delphi:

xlApp := CreateOLEObject('Excel.Application');
xlApp.Visible := True;
xlWorkBook := xlApp.Workbooks.Add;
xlWorkBook.ActiveSheet.Buttons.Add(10, 10, 80, 30).Select;
xlWorkBook.Selection.OnAction := 'Macro1';

Документация Delphi по автоматизации Office COM отсутствует.Вы должны использовать документацию MSDN и перевести ее на Delphi самостоятельно.