kodu aşağıdaki gibi düzenleyip dener misiniz?

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 ('" & _

DLookup("kullanici_id", "kullanicilar", "kullanici=[Forms]![frm_kisiler]![kullanici]") & "', '" & 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 & "') "