modifica macro chiusura excel

Ciao a tutti.
Nella macro allegata dopo l'avvio si visualizza un messagggio.
Chiedo una modifica.
Nella macro è disabilitato il CTRL+PAUSE.
Quando si visualizza il messaggio iniziale clicco CTRT+PAUSE si viusalizza
un messaggio "CTRL+PAUSE è disabilitato" e qui dovrebbe chiudersi Excel ma
invece si visualizzano i due messaggi che ci sono in
Private Sub Workbook_BeforeClose(Cancel As Boolean).
Cliccando CTRL+PAUSE dovrebbe chiudersi excel senza passare per
Private Sub Workbook_BeforeClose(Cancel As Boolean).
Spero di essermi spiegato.
Un saluto e buona Pasqua a tutti.
max

Mettici un Application.EnableEvents = False prima del ThisWorkbook.Close in modo da evitare l'attivarsi dell'evento Workbook_BeforeClose .

Ciao rollis13
è o.k.
Un saluto e buona Pasqua.
max

Grazie del riscontro e Buona Festa anche a te.

Ciao,
succede qualcosa di strano.
La macro funziona ma non so perchè, dopo aver fatto varie prove, che questo workbook aprendolo direttamente dal file
non si visualizzi il messaggio di avvio.
Se invece apro questo workbook lo apro da nuovo foglio>apri il workbook funziona sempre.
Forse troppo consumo di memoria?
max

Immagino che ti è chiaro che senza poter replicare il problema è difficile per chiunque fare diagnosi.
L'unico pensiero che mi viene è che dato che stai utilizzando 'ThisWorkbook.Close', se poi ti scordi di chiudere del tutto Excel, quando vai ad aprire nuovamente il file viene "ripresa" la precedente sessione di Excel e pertanto la macro 'WorkBook_Open' non si attiva.

Mah non so.
Questo file qualche volta per qualche motivo all'avvio non si visualizza il messaggio.
Chiudo e riapro per varie volte e il messaggio non si visualizza.
Se poi lo apro con excel (principale) > apri e seleziono questo file funziona sempre.
Questo capita anche con altri workbook sempre con macro.
max