如何導入一个EXCEL表到ACCESS，了。多谢

怎么導入一个EXCEL表到ACCESS，请教大家了。谢谢
我想做一个小软件，添加一个EXCEL的表到VB的数据库里面，用的ACCESS数据库。需要什么控件，能不能仔细点告诉一下啊。谢谢了。

------解决方案--------------------
一个access到excel的例子，楼主可以参考下，改改代码就可以了

========================================================
'Excel对象的使用(将Access中的数据导入到一个新建的Excel文件中)
'========================================================
Private Sub Form_Load()
Dim I, J As Long
Dim conn As ADODB.Connection
Dim rst As ADODB.Recordset

Set conn = New ADODB.Connection
Set rst = New ADODB.Recordset
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\db1.mdb;Persist Security Info=False "
conn.Open

rst.CursorLocation = adUseClient
rst.Open "select * from tableabc ", conn, adOpenDynamic, adLockOptimistic

Dim MyApp As Excel.Application
Dim MyBook As Excel.Workbook
Dim MySheet As Excel.Worksheet
Set MyApp = CreateObject( "Excel.Application ")
MyApp.Visible = False
Set MyBook = MyApp.Workbooks.Add()
Set MySheet = MyBook.Worksheets(1)

J = 1
Do Until rst.EOF
For I = 1 To rst.Fields.Count
MySheet.Cells(J, I) = rst.Fields(I - 1)
Next
rst.MoveNext
J = J + 1
Loop

MyBook.SaveAs "C:\11.xls "

MyApp.Quit

Set MyApp = Nothing

rst.Close

Set rst = Nothing
Set conn = Nothing
End Sub