如何用Delphi设置一个Excel文档的打印方向？（不是在Delphi中调用和打印）

Question

如何设置一个外部的Excel文档的打印方向？
急！谢谢

Answer 1

给你一段C++BUILDER的代码.
用Orientation判断打印方向.
String Orientation;
Orientation=xlApp.PG("ActiveWorkbook").PG("ActiveSheet").PG("PageSetup").PG("Orientation");
  if(Orientation=="1") //纵向
    maxrow=45;
  else//横向
    maxrow=15;

Answer 2

Xl.ActiveSheet.PageSetup.Orientation := xlPortrait;//纵向
Xl.ActiveSheet.PageSetup.Orientation := xlLandscape;//横向//Xl:=CreateOLEObject('Excel.Application');//高手都回家过年啦，我捡点分才回家过年。