Imprimir Relatório Excel Pelo Delphi ( Agradecimento )

Ok Edmar Soethe da Silva, Agradeço muito a ajuda ...

O código que colocou realmente funciona, coloquei uma linha anterior a suar
afim de selecionar a planilha a ser impressa( Excel.Workbooks[1].WorkSheets[3].Activate; )

Veja como ficou...

------------------------------------------------------------------------------------------------------

procedure Importa;
var
Excel : OleVariant;
begin
Try
Excel := CreateOleObject(´Excel.Application´);
Excel.Visible := False; {True mostra o excel, false não mostra}
Excel.WorkBooks.Open(CAMINHO_E_NOME_DO_ARQUIVO, EmptyParam, EmptyParam, EmptyParam, SENHA_DA_PLANILHA,

EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam);
//

//falta código parar imprimir ...
//*****************************************************************************************
Excel.Workbooks[1].WorkSheets[3].Activate;// Para selecionar a planilha a ser impressa
//******************************************************************************************
Excel.ActiveWindow.SelectedSheets.PrintOut(Copies:=1, Collate:=True);
* só adicionei esta linha

//
LABEL.CAPTION := String(Excel.WorkBooks[1].Sheets[1].Cells[LINHA, COLUNA];
Excel.WorkBooks.Close;
Excel.Quit;
End;

----------------------------------------------------------------------------------------------------------

A propósito, se não foi perdir muito, para que serve o parâmetro ´Collate´, Mencionado acima...

Desde já agradeço a colaboração ...


[]´s
Guialberto