Sauvegarde sous le nom d'un fichier existant - vba

[marou76]

Bonjour,

J'utilise le code suivant (VBA Excel 2003) pour sauvegarder mon fichier excel sous un nom spécifique:

With ThisWorkbook
    '.SaveCopyAs "C:\Data\monpc\Mes Documents\Application Excel\" & val1 & "_" & val2 & ".xls"
    .SaveCopyAs Enseigne & "_" & Jour & ".xls"
    '.Close False
End With

La sauvegarde s'effectue bien. Cependant lorsque je réouvre ce fichier et lorsque je souhaite le réenregistrer (pour tenir compte des modifications que j'aurais faites) sous le même nom le programme beug.
Que dois-je ajouter pour que le fichier enregistre les modification seulement, sans crée de nouveau fichier ?

Merci pour votre aide.

Cordialement.

 

[marou76]

Re : Sauvegarde sous le nom d'un fichier existant - vba

Le code est plutot celui-ci :

With ThisWorkbook
.SaveCopyAs Enseigne & "_" & Jour & ".xls"
End With

 

[marou76]

Re : Sauvegarde sous le nom d'un fichier existant - vba

Je souhaite en faite que la sauvegarde écrase le fichier existant sous le même nom dans le cas ou il a déja été crée, ou qu'il le crée dans l'autre cas.

Merci

 

[Pierrot93]

Re : Sauvegarde sous le nom d'un fichier existant - vba

Bonjour,

"SaveCopyAs" créé une nouvelle copie du classeur en laissant le fichier ouvert sous le nom d'origine, pour un "enregistrer sous" utiliser "SaveAs", mais le classeur sous l'ancien nom sera toujours présent sur le disque...

bonne journée
@+

 

[marou76]

Re : Sauvegarde sous le nom d'un fichier existant - vba

Encore Merci Pierrot !! T'es un As!!
Bonne journée . . .

Cordialement.