VBA Faire une copie de sauvegarde

Bonjour à tous,

Sur le fichier "main courante", j'ai une macro qui enregistre le fichier à chaque validation.

Le problème c'est que si l'utilisateur fait une une fausse manip., il ne peut plus revenir en arrière !

C'est pourquoi, je souhaiterais ajouter un bouton qui :

après s'être assuré que tout est conforme,

• Copierai le fichier sous un nom de sauvegarde. (à chaque fois, la sauvegarde serait écrasée par la nouvelle.)
• Et cela sans fermer le fichier en cours. (de manière à continuer de travailler dessus)

Exemple : je travail sur le fichier "dudu", il y aurai un fichier "duduSauv" qui s'écraserait à chaque fois.

Cela est-il possible et comment voyez-vous çà ?

Bonne journée

Amicalement

Claude.

bonjour,

ça devrait donner :

Application.ScreenUpdating = False
Wb = ThisWorkbook.Name
TWay = "C:\Documents and Settings\blabla\save\"
WbDest = "MonBeauClasseur.xls"
TDest = TWay & WbDest
Application.DisplayAlerts = False
Workbooks(Wb).SaveCopyAs TDest

A+

re,

galopin01, tes trop rares apparitions sur le forum sont toujours appréciées !

C'est exactement ce que je souhaitais.

Peux-tu m'aider à mettre les bonnes variables ? Dim As...

Sub sauve()
Dim Wb
Dim TWay
Dim WbDest
Dim TDest
    Application.ScreenUpdating = False
    Wb = ThisWorkbook.Name
    TWay = "C:\excel2008\forum\Sauvegarde_"
    WbDest = "remplir2.xls"
    TDest = TWay & WbDest
    Application.DisplayAlerts = False
    Workbooks(Wb).SaveCopyAs TDest
End Sub

merci

amicalement

Claude.

bonsoir,

Toutes les variables sont destinées à contenir des chaines de caractère (donc de type string)

On peut donc utiliser "As String" dans les quatres cas.

Personnellement j'utiliserais plutôt :

Sub sauve() 
Dim Wb$, TWay$, WbDest$, TDest$
    Application.ScreenUpdating = False
...

Cette manière de faire est absolument équivalente et (à mon avis) bien plus ergonomique

Toute variable déclarée de cette manière (avec le symbole $) est de type String.

A+

re,

Bon, je m'en doutais un peu, mais comme je suis en plein apprentissage des variables,

je préférais demander.

encore merci

à+....Claude.