首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > PB >

pb怎么连接已打开的excel文档

2013-08-29 
pb如何连接已打开的excel文档指定的文件名的电子表格已经用excel打开,PB应用程序如何连接到这个已打开的电

pb如何连接已打开的excel文档
指定的文件名的电子表格已经用excel打开,PB应用程序如何连接到这个已打开的电子表格,然后读取表格里的数据?
[解决办法]
OLEObject ole_excel, ole_sheet
ole_excel = CREATE OLEObject
ole_sheet = CREATE OLEObject
If ole_excel.ConnectToNewObject("Excel.Application" ) < 0  Then
MessageBox('出错',"不能连接 EXCEL 服务器,请检查你的计算机中是 ~r~n " +&
"否安装了MS EXCEL ? 假如安装,请与程序供应商联系 !",QuesTion!)
Return
End If
ole_excel.Application.Visible = FALSE
ole_excel.Workbooks.Open(eccel文件路径) //打开EXCEL文件
ole_sheet = ole_excel.Application.activeworkbook.worksheets[1] //要取值的工作页
ole_sheet.cells[i,j].Value//取第i行第j列的数据


[解决办法]
ConnectToObject 要用这个函数去连接已经打开的excel程序

然后遍历打开的workbook 判断标题可以确定是哪个文件

热点排行