Добрый день,
нашел код в MSDN
http://msdn.microsoft.com/library/rus/default.asp?url=/library/rus/dv_vbcode/html/vbtskcodeexamplereadingexceldataintodataset.asp
для считывание first.xls в dataset
код привожу ниже:

Dim DS As System.Data.DataSet
Dim MyCommand As System.Data.OleDb.OleDbDataAdapter
Dim MyConnection As System.Data.OleDb.OleDbConnection
MyConnection = New System.Data.OleDb.OleDbConnection( _
"provider=Microsoft.Jet.OLEDB.4.0; " & _
"data source=D:\Alex_new\first.XLS; " & _
"Extended Properties=Excel 8.0;")
MyCommand = New System.Data.OleDb.OleDbDataAdapter( _
"select * from [Sheet1$]", MyConnection)
DS = New System.Data.DataSet()
MyCommand.Fill(DS)
MyConnection.Close()

при запуске ошибка
--Недопустимое имя 'Sheet1$'. Проверьте, что оно не содержит недопустимые символы или знаки препинания, а также не является слишком длинным--
на комп. установлен Excel 2003
В чем ошибка?
C Уважением,
Alex

Sheet1 - это название листа в экселевском файле. Проверьте какое имя листа в вашем файле. Русский Excel создает по умолчанию имена вида Лист1, Лист2 и т.д.
Спасибо, вроде заработало
С Уважением,
Alex