51Testing软件测试论坛

标题: vb打开excel报错 [打印本页]

作者: hxs880 时间: 2011-11-7 12:56
标题: vb打开excel报错
代码如下：
Public Function  OpenExcel(sFileName, vSheet)
'On Error Resume Next
ExcelFile=sFileName
SheetName=vSheet
Set xls=CreateObject("Excel.Application")
Set xlsWorkBook = xls.Workbooks.Open (ExcelFile)'报错：Excel 无法打开文件“01登录.xlsx”，因为文件格式或文件扩展名无效。请确定文件未损坏，并且文件扩展名与文件的格式匹配。 If SheetName = "" Then
      SheetName = "Sheet1$"
End If
   Set xlsWorkSheet = xlsWorkBook.WorkSheets(SheetName)
      OpenExcel=True
End Function
Public Function GetValue(row,col)
   GetValue=xlsWorkSheet.rows(row).Columns(col).Value
End Function
调试后发现：
ExcelFile=“F:\exchange\TestData\会员服务\01登录_liyan.xlsx”就会报错
但如果
ExcelFile=“F:\exchange\TestData\01登录_liyan.xlsx”就不会报错
难道和目录级数有关？但原先没碰到过类似的问题啊。
ps：excle版本是2007的，操作系统是win7的
请好心人帮忙看看，急啊~~~~~~~~~

作者: hxs880 时间: 2011-11-7 14:16

没人知道吗？

作者: SexyCat_1113 时间: 2011-11-7 16:24
可能是07太高级了，，，

作者: wangyanzhao 时间: 2011-11-13 00:06
用xls 就可以了

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)