当前位置: 代码迷 >> PB >> 如何实现pb与excel的ole通讯
  详细解决方案

如何实现pb与excel的ole通讯

热度:105   发布时间:2016-04-29 07:05:35.0
怎么实现pb与excel的ole通讯
我有一个问题向求助大家:
  我有一个打印功能需要完成,但是得需要pb先打开excel,然后从excel里面读参数,再把数据窗口的内容存到excel中。
<1>从excel里读参数,用getremote('r1c3',vprompt,handle1)语句读不出内容。有其他语句可以完成此功能吗?
<2>能用其他ole语句解决吗?
------解决方案--------------------
从excel文件获得数据

ole1= CREATE OLEObject
ole1.ConnectTonewObject("Excel.application")
//选择要导入数据的EXCEL文件
ll_rtn = getfileopenname('打开文件',ls_pathname,ls_filename,'XLS','EXCEL文件(*.xls),*.xls')

ole1.workbooks.open(ls_pathname,0,0)
ole1.visible = true
//获取EXCEL单元格数据
ls_cell = ole1.workbooks[1].worksheets[1].cells(ll_rowno,ll_colno).value
------解决方案--------------------
OLEObject ole1
从excel文件获得数据

ole1= CREATE OLEObject
ole1.ConnectTonewObject("Excel.application")
//选择要导入数据的EXCEL文件
ll_rtn = getfileopenname('打开文件',ls_pathname,ls_filename,'XLS','EXCEL文件(*.xls),*.xls')

ole1.workbooks.open(ls_pathname,0,0)
ole1.visible = true
//获取EXCEL单元格数据
ls_cell = ole1.workbooks[1].worksheets[1].cells(ll_rowno,ll_colno).value

------解决方案--------------------
来学习,但是看不出楼上两个答案有什么不一样的,只是多了一个变量定义阿
  相关解决方案