Discussion :

[ChricChrac]

Bonjour,

Je veux sauver un fichier (ActiveWorkbook.Saveas nomnfichier). Si le fichier existe, Excel propose d'écraser l'ancienne version. Si je répond "Oui" ça fonctionne. Si je répond "Non" ou "Annulé", je reçois le message d'erreur suivant :

La méthode Saveas de l'object '_Workbook' a échoué

Comment contourner ce problème ? Je veux pouvoir répondre "Oui" ou "Non".

Merci

[Menhir]

Tu peux contourner le problème.

Utilise une fonction Dir() pour vérifier si un fichier existe déjà avec ce nom.
Si le fichier existe, tu utilises une MsgBox pour demander à l'utilisateur s'il veut l'écraser.
S'il répond non, la macro ne fait pas de SaveAs.
S'il répond oui, la macro supprime le fichier existant avec un Kill (où, plus sûr, le renomme) et fait le SaveAs.

[ChricChrac]

Merci Menhir. Je prend ta solution.