hxs880 发表于 2011-11-7 12:56:36

vb打开excel报错

代码如下：
Public FunctionOpenExcel(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:07

:'( 没人知道吗？

SexyCat_1113 发表于 2011-11-7 16:24:03

可能是07太高级了，，，

wangyanzhao 发表于 2011-11-13 00:06:10

用xls 就可以了
页: [1]
查看完整版本: vb打开excel报错