大神求指导!vb写的代码，运行出错48，加载dll文件有错误

Question

Public Sub openExcel()
'设置对话框属性,用于指定EXCEL文件
CommonDialog1.Filter= “Excel文件 ＊ .xls”
CommonDialog1.Action= 1
If CommonDialog1.FileName< > “” Then
expath= CommonDialog1.FileName
'打开对话框指定的EXCEL工作簿
Workbooks.Open FileName:= expath，这句出错，提示加载dll错误
oldbook.Close
Else
End If
End Sub

Answer 1

你的电脑安装了office吗vb操作EXCEL需要有office相关的东东

Answer 2

office2003,2007都安装了

Answer 3

用oldxls.Workbooks.Open FileName:= expath

Answer 4

是否new 了excel相关的类
分解问题验证，先不用commandbar 直接在app.path下面建立一个Exel看能否顺利操作