problème d'alerte !?

[Novice avance !?]

bonjour,
voici le code qui à l'activation d'une feuille enregistre le classeur sous un nom particulier et quitte l'application excel ... mais malgré application.displayalerts = false .... l'alerte me demandant de confirmer la sauvegarde ressort toujours !?

j'ai essayé de le placer avant, après "on error résume next" mais rien n'y change !?

où pourrait-être le souci !?😕

Private Sub Worksheet_Activate()
On Error Resume Next

Application.DisplayAlerts = False

ActiveWorkbook.SaveAs Filename:= _
"\\xxxx\xxxx\Application_" & Format(Date, "dd mm yyyy"), _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

Application.DisplayAlerts = True

On Error GoTo 0

Application.quit
End Sub

merci

 

[Baside]

Re : problème d'alerte !?

Bonjour le forum,

Avec

Application.Quit
ThisWorkbook.Close SaveChanges:=True

Amicalement, Hervé.