DoCmd.RunSQL "INSERT INTO tbl_kisiler (kullanici_id,il, saglik_tesisi,tc__no,adi_soyadi,unvani,e_posta,cep_telefonu,gorevi,calistigi_birim,hata_turu) VALUES (kullanicilar.kullanici_id , '" & Me.il & " ','" & Me.saglik_tesisi & "','" & Me.tc__no & "','" & Me.adi_soyadi & "','" & Me.unvani & "', '" & Me.e_posta & "','" & Me.cep_telefonu & "','" & Me.gorevi & "','" & Me.calistigi_birim & "','" & Me.hata_turu & "') WHERE ((kullanicilar.kullanici_id =( WHERE( kullanicilar.kullanici=[Forms]![frm_kisiler]![kullanici]))))"

 merhabalar, "kullanıcılar" tablomun id si "tbl_kisiler" de yabancı anahtar. ben önce kullanıcılara ekliyorum sonra onun id sini alıp "tbl_kisiler" e eklemek istiyorum, işte buraya eklerken bir şart oluşturmak istiyorum şartım da şu ki: """  formumdaki  kullanici adlı denetimimin ,"kullanicilar" adlı tablomdaki "kullanici" alanına eşit olan kaydın id sini alıp "tbl_kisiler" e yabancı anahtar olarak eklemek istiyorum"""""""  bu doğrultuda yukarıdaki gibi tamamen acemice ama belli bir mantığa göre yazdığım kod işimi görmedi, bi bakabilir misiniz arkadaşlar, biraz karışık gibi anlattım ama kusura bakmayın, kısaca A ve B tablom var ilişkili... önce A ya kayıt yapıyorum sonra onun id sini alıp B deki kayıtla eşleştirmek (formumdaki referans denetimim ile eşleşiyorsa) istiyorum, çok teşekkürler şimdiden.
 dosya ekte, işlemim " ekle" butonu ile ilgili.

WHERE ((  " & dgr14 & "  ) = DMax(  " & dgr20 & "  , ' " & dgr16 & " '))

dgr14= KISILER.kisi_id 'tablo ve alan
dgr20=kisi_id  'alan
dgr16=KISILER 'tablo

merhaba arkadaşlar bu ifadeyi evirip cevirip çalıştırıyorum çalışmıyor , acaba nerede hata yapıyorum bi bakabilir misiniz, şimdiden teşekkürler.

dosya ekte, ANAFORM da ekle butnunun değerlerini alan ekle() fonksiyonunda