demande de confirmation de sauvegarde

Bonjour,

Je reprend le code de quelqu'un et j'aimerais enlever un message du type " un fichier nommé nom.xls est déja présent dans cet emplacmeent voulez le remplacez?"

j'aimerais enlevez ce message
j'ai essayé ca mais cela ne fonctionne pas

Code:

---

1 2 3

ActiveWorkbook.Save ActiveWorkbook.Saved = True ActiveWindow.Close

---

Si quelqu'un peut m'aider merci d'avance

Bonjour,
avant ton Code : Application.DisplayAlerts = False

Apres ton Code : Application.DisplayAlerts = True

Si tu veux écraser le fichier et si tu te moques de savoir si le fichier existe déjà ==> supprime-le avant de le sauve.

Code:

---

1 2 3 4 5

On Error Resume Next Kill "TheFile.xls" On Error Goto 0   ActiveWorkbook.Save

---

Tu peux contracter ton code en suivant le conseil de Jean-Pierre49

Code:

---

1 2 3

Application.DisplayAlerts = False ActiveWorkbook.Close True Application.DisplayAlerts = True

---