Visual Basic - convertir documento excel a acces

Hola, ayuda!, necesito exportar información de un documento de excel a una base de datos de acces, no sé como hacerlo desde Visual Basic 6.0, plz es urgente!

Se hacerlo directamente des de excel, pero necesito hacerlo desde un formulario de Visual Basic 6.0

De antemano Gracias, John

hay funciones que pueden chupar directamente desde excel. ponte en algun buscador y pon excel vb y te apareceran.
la idea es chupar del excel, y vinculas una tablita de access con opendatabase, y vas chupando del excel, y guardando en access.
espero te sirva de ayuda.
;-)

'Gaxias, ya lo logré, utilicé el menú Proyecto--> Referencias... y activar "Microsoft Excel 10.0 Object Library"
'para poder declarar una var tipo Excel.Application
'osea

'Esto se puede agregar al evento form load
'o command click
Dim xlsLoquesea As Excel.Application 'declaras una variable tipo
'aplicación de excel
'de ahí lo de la activación del Excel object library
'sino te pondría algo de definido
'por el usuario

Dim xlsLibro As Excel.Workbook 'Declaras la var para hacer referencia al
'libro de excel
Dim xlsHoja As Excel.Worksheet 'Declaras la variable para manejar la
'hoja de trabajo


Dim Datos(5) as string 'Variable para almacenar datos jalados desde excel
'declarado como string par datos alfanuméricos

'Creamos el objeto
xlsLoquesea = CreateObject ("Excel.Application")
xlsLoquesea.Visible = Falso 'Para no mostrar cuando se habre excel

'Definimos el libro
Set xlsLibro= xlsLoquesea.Workbooks.Open(App.Path & "\Libro1.xls")

'Definimos hoja activa
Set xlsHoja = xlsLibro.ActiveSheet

Datos(0) = xlsHoja.Cells(1, 1).Value 'asigna valor de la celda A1
Datos(1) = xlsHoja.Cells(2, 1).Value 'asigna valor de la celda A2
Datos(2) = xlsHoja.Cells(3, 1).Value 'asigna valor de la celda A3
Datos(3) = xlsHoja.Cells(4, 1).Value 'asigna valor de la celda A2
Datos(4) = xlsHoja.Cells(5, 1).Value 'asigna valor de la celda A3
'Ejemplo
Text1.Text = Datos(0)
Text2.Text = Datos(1)
'etc.

'Ya tenemos los registros el la variable Datos sólo falta mandarlos a algún control
'o a la base de datos, definir si deseamos guardar los datos del libro

xlsLibro.Close savechanges:=True

'Cerramos excel y vaciamos las variables
' Cierra Excel y destruye las varibles de objecto
xlsLoquesea.Quit
Set xlsHoja = Nothing
Set xlsLibro = Nothing
Set xlsLoquesea = Nothing

'Nota: En éste ejemplo sólo se usaron 5 registros de la hoja de excel
'pero tú puedes utilizar más haciendo ésto "Numeros(10)" para 10
'registros, o se puede utilizar otro metodo para redimencionar la var datos

'Saludos, John