Ölümcül hatalar diye isimlendirdiğimiz hataları yapmışsınız bundan dolayı sıkıntı yaşıyorsunuz. YKBSKAYIT isimli formda yer alan DosyaNo yanlış yazılmış. Formdaki hali Dosya No yani siz kodlarda [Dosya No] yazacaksınız.

Program hata ekranı çıkınca End ve Debug tuşlarından Debug yazana tıklayın. Sizi hatanın olduğu satıra götürecektir. Oradaki kodları incelerseniz hataları göreceksiniz. Formdaki metin kutularının adı ile kodlardaki isimler farklı. Aşağıdaki gibi olacak kodlarınız:

    DoCmd.OpenForm "YKBSKAYIT"

    Forms!YKBSKAYIT.SetFocus

    Forms!YKBSKAYIT![DOSYA NO].Value = List2.Column(1)

    Forms!YKBSKAYIT![AİLE NO].Value = List2.Column(2)

    Forms!YKBSKAYIT!ADI.Value = List2.Column(3)

    Forms!YKBSKAYIT!SOYADI.Value = List2.Column(4)

    Forms!YKBSKAYIT![ADA ADI].Value = List2.Column(5)

    Forms!YKBSKAYIT![BABA ADI].Value = List2.Column(6)