userform çıkıştan sonra uyarı vermesi

[siyahim]

arkadaşlar acces ana formu üzerindeki iconlara köprü atayıp excel dosyasını açıyorum. otomatik olarak userformdan başlatıyorum exceli ancak userformu kapatınca dosya tekrar açılsın mı uyarısı veriyor bunun bir çözümü varmı acaba örnek dosya büyük olduğundan yükleyemedim kusura bakmayın

 

[efeksk]

UserFormunuz X butonuna bastığında excel ile beraber gizleme moduna giriyor demektir. Bu durumu düzeltmek için ;

SEÇENEK-1
UserFormunuzun Kod sayfasını açın.
ve aşağıdaki kodları ekleyin

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
On Error Resume Next
    If MsgBox("Programdan Çıkmak İstiyor musunuz? ?", vbYesNo, "Dikkat") = vbNo Then Exit Sub
 
   
     MsgBox "LÜTFEN Bekleyiniz.....Verileriniz Kaydedilip Program Kapatılacak...", vbCritical
  Unload UserForm1
    Workbooks("[COLOR="Red"]DOSYANIZIN ADI[/COLOR].XLS").Save
    Application.Visible = True
    ActiveWorkbook.Close
End Sub

---------------------------------------------------------------------