怎么实现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
[解决办法]
来学习,但是看不出楼上两个答案有什么不一样的,只是多了一个变量定义阿