GENERAZIONE OFFERTE

Private Sub DataGrid1_afterUpdate()
Set rsoffpro = db.OpenRecordset("SELECT * from tabdetoff")
Set rsofferte = db.OpenRecordset("SELECT * from taboff")
rsoffpro.MoveLast
rsoffpro.Edit
rsoffpro.Fields("IDtaboff") = rsofferte.Fields("ID")
rsoffpro.Update
End Sub


Premesso il suscritto codice, ho due tabelle, una (rsofferte) che contiene i 
dati generici e la tabella (tabdefpro) che contiene gli articoli che 
aggiungo col datagrid, la tecnica andrebbe bene anche per generare bolle di 
trasporto, comunque il mio problema è il seguete:

dopo averlo mandato in esecuzione se vado a leggere in file mdb noto che 
relazionato alla tabella rsofferte ci sono tutti i record della tabella 
tabdefpro tranne il terzo come segue figura:

  taboff ID numoff datoff rifclioff datclioff oggoff
      -855013738 101 06/05/2007




  tabdetoff codoff desoff quaoff preoff impoff scooff conart ID
      1000 ARTICOLO 1000 1 1 1 1
     10232
      1000 ARTICOLO 1000 2 2 2 2
     10233
      1000 ARTICOLO 1000 4 4 4 4
     10235


riuscite a dirmi dove sbaglio? grazie