[[poliburro]]

Eso es sumamente sencillo amigo mio.

Debes seleccionar el menú archivo de excell, configurar impresora y en el menú propiedades elegir orientación horizontal.




perdón jajaja. fué un chascarrillo. te paso el código que yo uso para esos menesteres.

suerte

Código Delphi [-]
 
const
  CIHOJA = -4167;
 
var
  LOlvExcell, LOlvHoja: OLEVariant;
 
begin
  LOlvExcell := CreateOleObject('Excel.Application');
  LOlvExcell.Visible := True;
  LOlvExcell.Workbooks.Add(CIHOJA);
  LOlvHoja := LOlvExcell.Workbooks[1].WorkSheets[1];
  LOlvHoja.PageSetUp.Orientation := 2; //Aquí se define la orientación
end;