Kod:
DoCmd.SetWarnings False
CurrentDb.Execute "DELETE FROM Tablo2"
CurrentDb.Execute "INSERT INTO tablo2 SELECT [tablo1].Kimlik,[tablo1].Tarih,[tablo1].adı, [tablo1].soyadı FROM Tablo1;"
DoCmd.SetWarnings True
DoCmd.SetWarnings False
CurrentDb.Execute "DELETE FROM Tablo2"
CurrentDb.Execute "INSERT INTO tablo2 SELECT [tablo1].Kimlik,[tablo1].Tarih,[tablo1].adı, [tablo1].soyadı FROM Tablo1;"
DoCmd.SetWarnings True