Discussion :

[philoflore]

Bonjour à tous

Comment faire pour enregistrer une copie d'un fichier en lui donnant toujours le même nom, tout en n'affichant pas le message du type "le fichier existe déjà, voulez vous le remplacer".

Ex. un fichier nommé abc.xls, dès son ouverture doit être enregistré toujours sous le nom de xyz.xls. Aucun message ne dois s'afficher lors de la copie. Au total, 2 fichiers abc.xls et xyz.xls.

Un grand merci pour votre réponse.

[Godzestla]

Si xyx.xls n'est pas ouvert un solution consiste à supprimer xyz.xls avant de faire le saveas.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
kill nom-complet_du_fichier_a_supprimer
thisworbook.saveas .....

[philoflore]

Merci pour cette réponse mais je ne peux procéder ainsi dans le programme.

N'ya t'il pas un morceau de code pour répondre "Oui" au message sans faire intervenir l'utilisateur ?

Merci

[Godzestla]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
 
Application.DisplayAlerts = False
ThisWorkbook.SaveAs Filename:="c:\data\newexls.xls"
Application.DisplayAlerts = True

[philoflore]

Génial, ça marche !!!

Un grand merci GodZestla