Bonjour,
J'aimerais à la fermeture d'un classeur donné qu'une sauvegarde soit
effectué avec comme nom Sauvegarde"Nom du Classeur & ladate
mais qu'en plus le premier Onglet prenne la date d'une cellule nommé du
classeur initial;
C'est possible
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Ellimac
Bonjour,
Dans le Visual Basic Editor, Projet "ThisWorkbook", évènement "BeforeClose" :
Private Sub Workbook_BeforeClose(Cancel As Boolean) Sheets(1).Name = Format(Range("LaDate"), "dd-mm-yy") ActiveWorkbook.SaveAs (ActiveWorkbook.Name & " " & _ Format(Now, "dd-mm-yy")) End Sub
Camille
-----Message d'origine----- Bonjour, J'aimerais à la fermeture d'un classeur donné qu'une sauvegarde soit
effectué avec comme nom Sauvegarde"Nom du Classeur & ladate
mais qu'en plus le premier Onglet prenne la date d'une cellule nommé du
classeur initial; C'est possible
Merci Pascal
.
Bonjour,
Dans le Visual Basic Editor, Projet "ThisWorkbook",
évènement "BeforeClose" :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets(1).Name = Format(Range("LaDate"), "dd-mm-yy")
ActiveWorkbook.SaveAs (ActiveWorkbook.Name & " " & _
Format(Now, "dd-mm-yy"))
End Sub
Camille
-----Message d'origine-----
Bonjour,
J'aimerais à la fermeture d'un classeur donné qu'une
sauvegarde soit
effectué avec comme nom Sauvegarde"Nom du Classeur &
ladate
mais qu'en plus le premier Onglet prenne la date d'une
cellule nommé du
Dans le Visual Basic Editor, Projet "ThisWorkbook", évènement "BeforeClose" :
Private Sub Workbook_BeforeClose(Cancel As Boolean) Sheets(1).Name = Format(Range("LaDate"), "dd-mm-yy") ActiveWorkbook.SaveAs (ActiveWorkbook.Name & " " & _ Format(Now, "dd-mm-yy")) End Sub
Camille
-----Message d'origine----- Bonjour, J'aimerais à la fermeture d'un classeur donné qu'une sauvegarde soit
effectué avec comme nom Sauvegarde"Nom du Classeur & ladate
mais qu'en plus le premier Onglet prenne la date d'une cellule nommé du
