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)