DoCmd.SetWarnings False
If Me.PERFORMANS = 0 Then
DoCmd.RunSQL "DELETE YILLIK_AMAÇLAR.id, YILLIK_AMAÇLAR.[YILLIK AMAÇLAR] FROM YILLIK_AMAÇLAR WHERE (((YILLIK_AMAÇLAR.id)=[Formlar]![Frm-Ana]![id]));"
Else
DoCmd.RunSQL "INSERT INTO YILLIK_AMAÇLAR ( id, [YILLIK AMAÇLAR] ) SELECT DEGERLENDİRME_ANA_TABLO.id, DEGERLENDİRME_ANA_TABLO.alanlar FROM DEGERLENDİRME_ANA_TABLO WHERE (((DEGERLENDİRME_ANA_TABLO.id)=[Formlar]![Frm-Ana]![id]));"
End If
DoCmd.SetWarnings True
tablo ile ilgili aşağıdaki bağlantıyı incele,
Yapılmaması gereken ölümcül hatalar
tabloda alan adına "YILLIK AMAÇLAR" yazarsan işin içinden çıkamazsın.