Ozan Bey alttaki kodu da kapat butonuna yazdım Anaformun kapanıp açılması olayınıda düzenlemiş oldum böylece çok teşekkür ederim.

Private Sub Kapat_BTN_Click()



If MsgBox("Ayni Yardım Çıkış Formu Kapanacak, Eminmisiniz.?", vbQuestion + vbYesNo, "Dikkat...!") = vbYes Then



DoCmd.Close acForm, "F_AyniYardimCikis"



End If



    If CurrentProject.AllForms("F_AyniYardimCikanListesi").IsLoaded = True Then

    

    DoCmd.Close acForm, "F_AnaForm"

    

    Else

    

    DoCmd.OpenForm "F_AnaForm"

    

    End If



End Sub