Eklediğiniz örnekteki kodda 2 problem var.
1-) from kodundan önce virgül olmamalı, belirlenen alanlar yazıldıktan sonra virgül eklenmez
2-) BARINIYORMU şeklinde alan eklemişsiniz. Ancak geçici tablodaki alanın adı [BARINI YORMU] şeklinde
kodun düzgün hali:
DoCmd.RunSQL "INSERT INTO DEFTER_KAYIT ( yil, [KAYIT NO], [KONUNUN ÖZETİ], KAYIT_TARIHI, SAYISI, geldigiyer, [TARİH], [ALINDIĞI TARİH], barinma ) SELECT TOP 1 [KAYIT YILI], [KAYIT SAYISI], [ADI SOYADI], [KAYIT TARİHİ], [TC NO], [İŞYERİ ADI], [GİRİŞ TARİHİ], [ÇIKIŞ TARİHİ], [BARINI YORMU] FROM tbl_Gecici WHERE [KAYIT YILI]=" & GYili & " AND [KAYIT SAYISI]=" & GKayitSayi & ""