olá,
Geralmente uso assim:
Dim db As DAO.Database
Dim rst As DAO.recordset
Set db = CurrentDB()
Set rst = db.OpenRecordset("TuaTabela", dbOpenTable)
rst.AddNew
rst!TeuCampo1 = teuValor1
rst!TeuCampo2 = TeuValor2
rst.Update
rst.Close
Set rst = Nothing
Nivaldo.
Geralmente uso assim:
Dim db As DAO.Database
Dim rst As DAO.recordset
Set db = CurrentDB()
Set rst = db.OpenRecordset("TuaTabela", dbOpenTable)
rst.AddNew
rst!TeuCampo1 = teuValor1
rst!TeuCampo2 = TeuValor2
rst.Update
rst.Close
Set rst = Nothing
Nivaldo.