PowerBuilder
pb倒excel表时），连续执行两次Workbooks.Open时出错！，如何判断是否已经打开了指定的excel文件（XLS文件
墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年，写一次发全网
我也要 关注 + 加入社区我用下面程序实现倒入
long numcols , numrows , c, r
OLEObject xlapp , xlsub
int ret
numcols = long(dw_1.Object.DataWindow.Column.Count)
numrows = dw_1.RowCount()
xlApp = Create OLEObject
ret = xlApp.ConnectToNewObject( "Excel.Sheet" )
if ret < 0 then
MessageBox("Connect to Excel Failed !",string(ret))
return
end if
xlApp.Application.Workbooks.Open("C:\表1.XLS") //,false,true
xlApp.Application.Visible = true
xlsub = xlapp.Application.ActiveWorkbook.Worksheets[1]
..................
倒入第一次的时候没有问题，
如果用户连续按两次倒入，那么excel会提示说，
“表1.XLS已经打开，重新执行操作会造成前面所做的更改丢失，是否重新打开？”
如果选择否是，pb程序就要报open语句出错，
大家帮忙呀，怎么解决呀
long numcols , numrows , c, r
OLEObject xlapp , xlsub
int ret
numcols = long(dw_1.Object.DataWindow.Column.Count)
numrows = dw_1.RowCount()
xlApp = Create OLEObject
ret = xlApp.ConnectToNewObject( "Excel.Sheet" )
if ret < 0 then
MessageBox("Connect to Excel Failed !",string(ret))
return
end if
xlApp.Application.Workbooks.Open("C:\表1.XLS") //,false,true
xlApp.Application.Visible = true
xlsub = xlapp.Application.ActiveWorkbook.Worksheets[1]
..................
倒入第一次的时候没有问题，
如果用户连续按两次倒入，那么excel会提示说，
“表1.XLS已经打开，重新执行操作会造成前面所做的更改丢失，是否重新打开？”
如果选择否是，pb程序就要报open语句出错，
大家帮忙呀，怎么解决呀
...全文
相关推荐
pb快速导出excel
") getfilesavename("保存为", ls_path, ls_file, "Excel", "Excel文件,*.xls")```**说明：**- 首先判断数据窗口`dw_1`中的行数是否超过
PB中导入EXCEL数据.doc
在本例中，我们使用 OLE 对象的 ConnectToNewObject 方法来连接 EXCEL 应用程序，并使用 Workbooks.Open 方法来打开选择的 EXCEL 文件。
PB导入excel转存txt
**打开并读取Excel文件**：通过 OLE 对象调用 Excel 的 Open 方法打开指定路径下的 Excel 文件。3. **保存为TXT文件**：将打开的Excel文件另存为TXT格式。
PB全面控制Excel_推荐
打开指定工作簿：使用 WorkBooks.Open 方法打开指定的工作簿，例如打开 c:\temp\ll.xls。3. 添加新工作簿：使用 WorkBooks.Add 方法添加新的工作簿。4.
Excel的数据导入到PB的DW中
**GetFileOpenName**：获取用户选择的文件路径，这里用于让用户选择需要导入的Excel文件。4. **Workbooks.Open**：打开指定路径的Excel文件。5.
