在PowerBuilder中利用自动化技术调用Excel处理与打印(2)
2014-10-30 01:08
导读：调用该函数时，如果成功的话，返回值是0，否则就意味着调用失败。 到此，自动化的准备工作已经完成，下面是具体的操作过程。 4 处理和打印表格 在调
调用该函数时，如果成功的话，返回值是0，否则就意味着调用失败。
到此，自动化的准备工作已经完成，下面是具体的操作过程。
4 处理和打印表格
在调用Excel时，首先需要解决的一个问题是是否让Excel可见，即是否为后台操作。这个问题可以简单的通过设置Visible属性加以控制，如果希望Excel后台运行，可以简单的编写如下语句：
OLE_MyExcel.visible=false
然后是打开指定的XLS文件，具体的语句如下：
OLE_MyExcel.Application.Workbooks.Open ("d:\excel-example.xls")
要操纵数据列表中的数据单元，就必须对ActiveCell对象进行操纵，该对象是Application对象中一项属性。将数据输入到一个数据单元包括两个步骤：第一是选择一个数据单元，第二是将数据传递给它。选择一个数据单元通过调用Range对象的Select()方法就可以完成，Range对象是用来选择一个或多个数据单元的。Select()方法需要起始的行数、列数和结束的行数、列数来确定所选择的数据单元。如果只选择一个单独的数据单元，就可以忽略结束的行、列数。当范围被设定以后，将数据传递给ActiveCell对象（引用了被Range对象指定的数据单元）的FormulaR1C1属性。如下：
OLE_MyExcel.Range("c10").Select()
OLE_MyExcel.ActiveCell.FormulaR1C1 = sle_2.text //Sle_2为一个静态文本框控件
OLE_MyExcel.Range("J10").Select()
……
如果希望得到一系列数值的和，则需要首先使用Select()方法来指定需要求和的Cell的范围，然后指定存放和的Cell位置，最后调用SUM方法即可，如下：
OLE_MyExcel.Range(“A1:D1”).Select()
OLE_MyExcel.Range(“E1”).Activate()
OLE_MyExcel.A
