Excelで新規にシートを追加・作成するには？

若葉マーク 2004-08-10 01:16:20 No: 10302

Delphi5でエクセルのシートを新規に追加するにはどうしたらいいでしょうか？
なにぶん初心者なのでつたない表現ですが、よろしくお願いします。

HOta 2004-08-10 01:54:01 No: 10303

OLEを使った例です。

var
   Excel: Variant;
   WorkBook: Variant;
   WorkSheet: Variant;
begin
   Excel := CreateOleObject('Excel.Application');
   WorkBook := Excel.Application;
   WorkBook.WorkBooks.Add;
   Workbook.sheets.add;