Désactiver les boites de dialogues

salut tout le monde ,

ya t'il une possibilité de désactiver les messages (boites de dialogue ) en fermant un fichier ?

ci joint fichier :

https://www.excel-pratique.com/~files/doc/boite_dial.xls

merci !

Bonsoir,

code à placer dans le ThisWorkbook

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    ThisWorkbook.Close False
End Sub

si tu veux enregistrer avant de fermer :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    With ActiveWorkbook
        .Save
        .Close False
    End With
End Sub

Claude.

salut Dubois,

Merci beaucoup pour votre aide, ça march très bien ,

mais j'ai un autre souci le fichier se ferme , mais il me reste cet écran …

ci joint fichier

https://www.excel-pratique.com/~files/doc/VWFuxfermerxl.xls

y' a t ' il un code pour pour le fermer aussi .

Merci

re,

Extrait de l'aide Excel (touche F1)

Application.Quit

à placer sur ligne avant le End Sub

Claude.

Bonjour ;

Merci beaucoup Dubois .

Rechercher des sujets similaires à "desactiver boites dialogues"