2

次のようなOLEメソッドを使用します。

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

ボタンをExcelに追加する方法は？

そして、このボタンに既存のマルコを割り当てる方法は?

Delphi-OLE-Office ドキュメントはどこにありますか?

どうも。

4

1 に答える 1

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';

Office COM オートメーションの Delphi ドキュメントはありません。MSDN ドキュメントを使用して、自分で Delphi に翻訳する必要があります。

于 2011-09-05T09:45:12.057 に答える