Enregistrer un classeur sans le renommer et sans le fermer

[maval]

Bonjour,,

J'ai un code pour enregistrer mon classeur qui est:

ActiveWorkBook.SaveAS

Seul petit souci est qu'il me met un message "Un fichier nommé Classeur1 existe déjà à cet emplacement. Voulez vous le remplacer?"

Alors que je cherche juste à l'enregistrer?

Merci d'avance

 

[phlaurent55]

Re : Enregistrer un classeur sans le renommer et sans le fermer

Bonjour Max,

il suffit de bloquer le message d'alerte avec:

Application.DisplayAlerts=False

à+
Philippe

Edit:

si il n'est pas nécessaire de renommer le fichier, il n'y a pas besoin de SaveAS


Application.DisplayAlerts=False
ActiveWorkbook.Save

 

[camarchepas]

Re : Enregistrer un classeur sans le renommer et sans le fermer

Bonjour Philippe , Maval

Et oui , Philippe à raison , mais comme d'habitude , tu ne dis pas tout :

Sub ff()
Fichier = "Test.xlsm"
Chemin = "c:\temp\"
Application.DisplayAlerts = False
  ActiveWorkbook.SaveAs  Chemin & Fichier 
Application.DisplayAlerts = True
End Sub

 

[maval]

Re : Enregistrer un classeur sans le renommer et sans le fermer

Bonjour Philippe,

Regarde chez si sa fonctionne chez j'ai toujours le même message

 

[maval]

Re : Enregistrer un classeur sans le renommer et sans le fermer

Re,,

Je vous remercie sa fonctionne

Bonne journée