日期:2013-10-05  浏览次数:20511 次


    在进行程序开发时,有时会需求将PowerBuilder与Excel使用程序结合使用,如将数据检索出来后,按照格式要求,将数据转入到Excel表格中。实现步骤如下:

 

  1.创建并连接对象:

  oleobject loo_excel

  oleobject loo_sheet

  loo_excel=create oleobject

  loo_excel.ConnectToNewObject("Excel.Application")

 

  //设置缺省的字体与大小

  loo_excel.Application.StandardFont = "Arial Narrow"

  loo_excel.Application.StandardFontSize = "8"

  loo_excel.Application.Workbooks.Add()

  loo_sheet=loo_excel.Application.Workbooks(1).worksheets(1)

  loo_excel.Application.Visible=true

  loo_excel.Application.ScreenUpdating = false //屏蔽可见属性

  2.调用Excel本身的属性,函数,通过数据窗口填写数据到Excel:

  loo_excel.Application.ScreenUpdating = true //设置可见属性

  3.断开连接并释放对象:  loo_excel.DisconnectObject()

  //注:建议援用API函数,捕获Handle。

destroy loo_excel