Question

如何用vb2005读excel中的数据

我到网上查了好多例子，但是到我这都不能用。
我也不知道为什么。是不是没添加什么引用？还是那些例子都不适用于vb2005的版本？
我想用oledb把excel当数据库连接，读取数据放到我定义的datatable中。
希望有高手能给出一个能实现的例子。

Answer 1

直接新建个Excel.Application的引用不好吗?那样可以直接用Excel对象引用了,不用SQL来访问。
Excel.Application.Worksheets可以遍历，然后用.Name列出来。

Sub test()
Dim xlApp As New Excel.Application
Dim xlWb As New Excel.Workbook
Dim xlWs
Set xlWb = xlApp.Workbooks.Open("d:\myliu\回盘数据发邮件.xls")
For Each xlWs In xlWb.Worksheets
MsgBox xlWs.Name
Next
xlWb.Close
End Sub