Hi guys,
OK, so now I want 3 field values from Table A to be written to 3 identical fields in Table B. All 3 values belongs to the same record in both tables.
Code:
Private Sub Form_AfterUpdate()
On Error GoTo Err_Form_AfterUpdate
Dim SQL_Text As String
SQL_Text = "Insert into [Abrasion] ([Item number]) Values(""" & [Item number] & """);"
CurrentDb.Execute SQL_Text, dbFailOnError
Exit_Form_AfterUpdate:
Exit Sub
Err_Form_AfterUpdate:
Resume Exit_Form_AfterUpdate
End Sub
This code works perfect for copying a single value to Abrasion. What shall I write if I in addition to the Item number value also want value B and value C to be copied as well to the same record in a different table (Abrasion)?
Thanks a lot!
BR