Mam's WebSite
建築CGパース住宅CGパース

Mamの覚書Q&A検索

トップページMamの覚書Q&A検索Delphi(Excel)⇒Q&A


大項目:「 Delphi 」 - 中項目:「 Excel 」

「 DelphiからMS-Excelのブックを開いてマクロを実行 」

DelphiからMS-Excelのブックを開いてマクロを実行するにはどうすれば良いか。


回答

普通に開いて、Runメソッドを使うだけです。
この場合、大きな注意点があって、マクロが存在しても開くときにマイクロソフト社のエクセルからの警告がありません。
警告なしにマクロを起動できてしまいます。

ソース

procedure TForm1.Button2Click(Sender: TObject);
var Excel,WB,WS:variant;
begin
  Excel := CreateOleObject('Excel.Application');
  //MS-EXCELを表示する
  Excel.Visible:= True;
  //ブックを開く
  WB:=Excel.WorkBooks.Open('c:\text.xls');
  //マクロを実行する
  Excel.Application.Run('Macro1');
 
  //MS-Excelを終了する
  Excel.Quit;
end;


Mam's WebSite