VBA updating & moving records
Posted on 2003-03-28
I was wondering if anyone could help me. I am importing data from an excel sheet to a temp table. From there the other tables will have information inserted into them from the temp table. Th eproblem I am having is that duplicate data is not being updated into original tables after being inserted into the temp table.
For example if I insert an excel sheet and update the temp table and then the tables I want the information to go into it works perfectly, but if I try to use the same excel sheet and try to carry out the same process the temp table updates but the other tables dont. Duplicate data shouldnt matter and new rows show automatically be created but it doesnt seem to work here is my code:
DoCmd.RunSQL ("Delete * from temp")
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "Temp", Sfile, False
Dim rs1 As Variant
Set rs1 = CurrentDb.OpenRecordset("SELECT F1,F2,F3 from Temp")
Do While Not rs1.EOF
SQL = "Insert INTO ManagedElementFamily (Name,Acronym,Description) VALUES ('" & rs1![F1] & "','" & rs1![F2] & "','" & rs1![F3] & " ')"
would be grateful if someone could help