abrindo excel

Delphi

20/02/2004

galera tenho uma aplicação com um botao para abrir o excel. meu excel é 2000 e o delphi é 7. como faço isso.


agradeço muito

roberto


Speedrob

Speedrob

Curtidas 0

Respostas

Lucas Silva

Lucas Silva

20/02/2004

uses ComObj;
.
.
.
procedure TForm1.Button1Click(Sender: TObject);
var excel: variant;
begin

      excel := CreateOleObject(´Excel.Application´);
      excel.Workbooks.add(1);
      excel.Cells.Select;
      excel.Selection.NumberFormat := ´@´;


      excel.cells[1,1] := ´Teste´;
      excel.columns.AutoFit;
      excel.cells[1,1].Select;
      excel.visible := true;

end;



GOSTEI 0
POSTAR