[résolu]Sauvegarde classeur excell avec nom déjà existant

[Al capone]

Bonjour,

J'ai parcouru à droite et à gauche pour trouver un moyne de sauvegarder un classeur excell sans qu'il me demande à chaque fois si je veux remplacer l'ancien. Et malgré le bout de code ci dessous, il me le demande ....

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objExcel = CreateObject("Excel.Application")

NomFichier = "D:\mondossier.xls"
objExcel.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:=NomFichier
objExcel.DisplayAlerts = True

Je vois pas ou est le problème .... Merci pour votre aide

 

[Pierrot93]

Re : Sauvegarde classeur excell avec nom déjà existant

Bonjour,

un code comme celui ci-dessous ne me demande pas de confirmation si fichier existe...

Application.DisplayAlerts = False
ThisWorkbook.SaveAs "C:\mesdocs\test.xls"
Application.DisplayAlerts = True

pourquoi créer un nouvel objet "application Excel" ???? le problème vient sans doute de la...

peut être en essayant ainsi :

objExcel.DisplayAlerts = False
objExcel.ActiveWorkbook.SaveAs Filename:=NomFichier

bnne journée
@+

 

[Papou-net]

Re : Sauvegarde classeur excell avec nom déjà existant

Bonjour Al capone,

Essaies en remplaçant :

objExcel.DisplayAlerts

par :

Application.DisplayAlerts

Espérant avoir résolu.

Cordialement.

 

[Al capone]

Re : Sauvegarde classeur excell avec nom déjà existant

Cool Problème résolu

Merci beaucoup. Je réédite mon titre.