Si lo q quieres es tirar simplemente un "INSERT INTO", hay una opción muy rapida y muy sencilla q es escribiendo simplemente
DoCmd.RunSQL "INSERT INTO table .... "
Xo tb te recomiendo q te mires los objetos DAO (en access funcionan mejor q ADO). Un ejemplo basico para q vayas tirando:
dim dbs as DataBase
dim rst as Recordset
set dbs = Currentdb 'Si quieres trabajar con la BD q tienes abierta
'Si quieres ejecutar una consulta SELECT
set rst = dbs.OpenRecordset ("SELECT * FROM tabla WHERE condition")
'Si quieres ejecutar una consulta de acción (INSERT, UPDATE, DELETE)
dbs.execute ("INSERT INTO tabla....")
'Y finalizas los objetos
rst.close
set rst = nothing
dbs.close
set dbs = nothing
Mira en la ayuda de access, hay tienes bastantes ejemplos