F
Flaneur
Guest
Bonjour à tous,
je cherche à créer des sauvegardes multiples d'un fichier..
Beaucoup d'entre vous m'ont bien aidé (merci encore)je suis sur la fin !!!
donc un bouton avec quit applic( je sais) doit enregistrer les fichiers.
la premiere fois ,impec, mais aprés il ignore les modifs apportées ?
Pourriez vous me dire ou est mon erreur ?
merci beaucoup!!
Merci en particulier à JC de Lorient pour sa
gentillesse et son aide !!
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:= _
'C:essai', FileFormat _
:=xlNormal, Password:='', WriteResPassword:='', ReadOnlyRecommended:= _
False, CreateBackup:=True
'essai de triple sauvegarde'ActiveWorkbook.SaveAs Filename:= _
'C:WINDOWS/'
ThisWorkbook.Save
Application.Quit
Application.DisplayAlerts = True
End Sub
Sub quitter()
je cherche à créer des sauvegardes multiples d'un fichier..
Beaucoup d'entre vous m'ont bien aidé (merci encore)je suis sur la fin !!!
donc un bouton avec quit applic( je sais) doit enregistrer les fichiers.
la premiere fois ,impec, mais aprés il ignore les modifs apportées ?
Pourriez vous me dire ou est mon erreur ?
merci beaucoup!!
Merci en particulier à JC de Lorient pour sa
gentillesse et son aide !!
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:= _
'C:essai', FileFormat _
:=xlNormal, Password:='', WriteResPassword:='', ReadOnlyRecommended:= _
False, CreateBackup:=True
'essai de triple sauvegarde'ActiveWorkbook.SaveAs Filename:= _
'C:WINDOWS/'
ThisWorkbook.Save
Application.Quit
Application.DisplayAlerts = True
End Sub
Sub quitter()