DoCmd.RunSQL "INSERT INTO tbl_degerlendirmeler ( id, beceriid, alanlar, EYLUL, EKİM, KASİM, ARALİK, OCAK, SUBAT, MART, NİSAN, MAYİS, HAZİRAN, altbaslikid ) SELECT id, beceriid, alanlar, EYLUL, EKİM, KASİM, ARALİK, OCAK, SUBAT, MART, NİSAN, MAYİS, HAZİRAN, altbaslikid FROM tbl_gecici WHERE (((id)=[Formlar]![frm_degerlendirmeyap]![Kimlik]) AND (([EYLUL] & [EKİM] & [KASİM] & [ARALİK] & [OCAK] & [SUBAT] & [MART] & [NİSAN] & [MAYİS] & [HAZİRAN]) Like '*' & '-1' & '*'));"
Butonun tıklandığında olayındaki kodu aşağıdaki ile değiştiriniz.