excel'in kapat [x} düğmesini nasıl değiştirebilirim?

Question

Excel'in kapat [x] işlevini devre dışı bırakan bu kodu kullanıyorum. ID girişini tamamladıktan sonra butonu tekrar etkinleştirmem gerekiyor.

ben devre dışı bu bölümü var [x] Bunu alabilir workbook modül için

Public FlagToClose As Boolean 
Sub Enter_1() 
    FlagToClose = False 

    'code 
    '..................... 

    FlagToClose = True 
End Sub 

,

Private Sub Workbook_Open() 
    FlagToClose = True 
End Sub 

Private Sub Workbook_BeforeClose(Cancel As Boolean) 
    If Not FlagToClose Then Cancel = True 
End Sub 

sonra tekrar nasıl yakın [x] fonksiyonunu etkinleştirmek için?

Answer 1

, kapanış yeniden etkinleştirmek kapanış önce bu kısa makro çalıştırmak için: olduğu gibi

Sub ev_off() 
    Application.EnableEvents = False 
End Sub