PB操作Excel出现错误 select select*from OPENROWSET('MICROSOFT.JET.OLEDB.4.0'，'Excel 8.0；HDR=YES；DATABASE=C：\\111.xls'，sheet1$) 提示：链接服务器\"(null)\"的 OLE DB 访问接口\"Microsoft。.
求PB通过OLE来显示excel的方法（直接在PB窗口中显示修改保存） 1、创建连接到excel应用的ole对象OleObject ole_excelole_excel=create OleObjectIf ole_excel.ConnectToNewObject(\"Excel.Application\")<；>；0 ThenMessageBox('连接到Excel错误'，'请确认是否已经安装了Excel。'，Exclamation。Destroy old_excelReturnEnd If2、打开指定的excle文件ole_excel.Application.Workbooks.Open(\"excel文件\")3、操作excel单元格excel单元格有一系列的操作，它们的使用格式一般如下：ole对象.ActiveWorkBook.Sheets(\"工作表名\").操作对象.动作或属性读取或赋值工作表1中单元格的格式：ole_excel.ActiveWorkBook.Sheets(\"工作表1\").cells[1，1].value合并工作表1中的第ll_rows_buget行的A列到I列的单元格：ole_excel.ActiveWorkBook.Sheets(\"工作表1\").Range(\"A\"+string(ll_rows_buget)+\"：I\"+string(ll_rows_buget)).Merge，还有如下一些与合并单元格相类似的动作或属性HorizontalAlignment=xlGeneral/单元格的横向对齐方式VerticalAlignment=xlBottom/单元格的纵向对齐方式(1、2左，3居中，4右)WrapText=True/自动换行Orientation=0AddIndent=FalseShrinkToFit=FalseMergeCells=False设置工作表1中的第ll_rows_buget行的A列。
PB SaveAsAscii导出EXCEL是空白的，代码如下： 本机正常导出，有的电脑无法导出 语法本身没有错误，可能还是运行环境的原因。很多网上下载的office，导入导出的时候就是会出现问题。可以选择使用其他的导出方式，比如用uo或者自定义输出函数！f_saveasexcel(dw_1，ls_err)。函数代码：integer li_rtn，ii，li_ascstring ls_name，ls_pathnameboolean lb_existlong numcols，c，rint retstring ls_colname，ls_text，ls_modistr，ls_colstring ls_s，ls_temp[]long ll_bupper，ll_blower，ll_jOLEObject lx_excelif datawin.RowCount()err=\"请先检索数据再导出至Excel。return false/errorend ifli_rtn=GetFileSaveName(\"保存文件\"，ls_pathname，ls_name，\"xls\"，\"Excel文件(*.xls)，*.xls\")if li_rtn=1 thenlb_exist=FileExists(ls_pathname)IF lb_exist THENli_rtn=MessageBox(\"保存\"，ls_pathname+\"已经存在，是否覆盖？Exclamation。YesNo。end ifif li_rtn=1 then当文件存在用户选择覆盖，或是文件本就不存在时。注意变量li_rtnli_rtn=datawin.SaveAsAscii(ls_pathname)if li_rtn<；>；1 thenerr=\"导出数据失败。return false/errorend ifelseerr=\"请选择要导出的路径。return false/errorend ifelseerr=\"已取消输出。return falseend if通过ole。
