Archiver une situation journalière

Bonjour
au plus simple:
clic droit sur l'onglet, créer une copie de la feuille
sélectionner la feuille complète (curseur dans le petit carré à gauche de la règle des colonnes)
clic droit / copier / collage spécial "valeurs"
le tableau ne comprendra plus de formule et sera donc figé
Ca peut se faire en VBA via un bouton
crdlmnt

Bonjour

Si tu veux que cela se fasse de façon automatique il faut passer par une macro
Mais il faut savoir :
- quelles données enregistrer (une feuille, extraction d'une feuille...),
- sous quel nom
- et surtout ce qui va déclencher la macro (l'écriture dans une cellule particulière, la fermeture du classeur ...)

Pour bâtir une macro il faut ces indications et un exemple de ton fichier que tu postes sur mon-partage.fr, tu fais créer un lien que tu copies et reviens coller ici

Cdlmnt
Via

Ton tableau est indexé sur une cellule avec AUJOURDHUI() qui s'actualise donc chaque jour, le passage au jour suivant ne semble pas indiqué pour lancer la macro d'archivage.
Le mieux c'est quand le tableau du jour a été complété donc soit la macro sera lancée automatiquement lorsqu'on remplit une certaine cellule ou lorsqu'on ferme le classeur soit lancée manuellement à partir d'un bouton sur la feuille comme suggère Vaucluse

Mais si tu veux de l'aide il faut nous envoyer une copie de ton fichier

Salut Via55. Merci. Donc OK pour t'envoyer une copie du fichier en question.
Peux tu m'indiquer la marche à suivre STP ?

Tu vas sur le site : ttps://mon-partage.fr
Tu choisis ton fichier puis tu le fais uploader et ensuite tu copies le lien en bleu qui s'affiche et reviens le coller ici
Dans l'attente

https://mon-partage.fr/f/utRGKOR7/
Voilà môssieur !
Faudra me dire quand même comment on fait !!!
Merci

OK bien reçu
Mais tu ne dis pas quelles données doivent être conservées
ni si tu veux un archivage à la fermeture du classeur ou à l’appui sur un bouton
ni sous quel nom tu veux archiver

Dans l'attente

Ok pardon.
Le mot de passe est : neant

Et oui, le savoir c’est l’immagination d’hier et l’immagination c’est le savoir de demain...

Re

Avec le bouton ça dysfonctionne pour l'enregistrer en tant que classeur sans macro donc j'ai pris l'option d'archiver avec la raccourci clavier Ctrl+a
https://mon-partage.fr/f/wBzgFsbd/

En espérant que cela te conviendra

Salut Messieurs Vaucluse et Via.
OK j,'ai retrouvé mon fichier !
Bon je viens de faire un test en mettant mon ordinateur à la date de demain et malheureusement, le fichier archivé a actualisé lui aussi comme le fichier source. donc c'est pas tout à fait ça encore.
Je constate que le fichier archivé contient toutes les formules et reste donc actif.
Vous disez koi ?

Re

Ok alors au lieu d'enregistrer un fichier est qu'un enregistrement de la feuille en PDF suffirait ?
En ce cas remplacer la macro par celle-ci :

Sub archives()
chemin = Workbooks(ActiveWorkbook.Name).Path
derligne = Application.WorksheetFunction.CountA(Range("B:B"))
ligne = Application.WorksheetFunction.Max(26, derligne)

 Range("C1:V" & ligne).Select
    ActiveSheet.PageSetup.PrintArea = "$C$1:$V" & ligne
    nomcomplet = chemin & "\Archive_" & Day(Date) & "-" & Month(Date) & "-" & Year(Date) & ".pdf"
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        nomcomplet, Quality:= _
        xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=True

MsgBox "PDF archivé"
End Sub

Cdlmnt
Via

En principe non
Mon fichier qui fonctionne :
https://www.cjoint.com/c/HJrsvTFHuJ8

Par le raccourci Ctrl+a (mais là on pourrait sans doute mettre un bouton)

Bonjour Via55
ok je vois que c'est tout à fait ce dont j'ai besoin.
Activer l'opération par Ctrl+a me convient parfaitement.
J'ai juste le soucis de lui faire avaler la Macro : il refuse de dépasser la ligne 9 ???
je réessaye ce matin pour voir et je tiens informé
En tout cas Merci bien.

Salut Mr Via
pardon , mais j'ai fait un copier coller de la macro que tu m'envoies ci dessus en remplacement de celle que tu as installée au départ mais quand je fait Ctrl+a, ca m'affiche le dossier Macro avec la partie "indigeste" teintée en jaune et un message comme quoi ça merde.
Curieux...

Re

Envoie moi ton fichier qui bug via le site mon-partage.fr, je regarderai

Cdlmnt
Via

https://mon-partage.fr/f/SmxcKQL4/
je te renvoie le fichier d'origine. J'arrive pas à faire télécharger l'autre.
si tu peux y coller la nouvelle macro ?

Re

Voilà :
https://mon-partage.fr/f/FaoTwQoh/

Salut.
Le résultat de la deuxième Macro ne convient pas : on archive que le haut de la feuille. les sauts de pages ne sont pas utiles.
Si je compare l'archivage qu'on obtient avec la première Macro, le résultat est bon sauf que les saisies s'actualisent.ors, je n'ai besoin d'archiver que les colonnes de A à Q. cette sélection exclue donc la cellule qui contient AUJOURDHUI().
Est-ce que ça peut fonctionner ?
Merci.

Salut

Pour n'archiver que de A à Q et pour que cela tienne sur une seule page en largeur :
https://mon-partage.fr/f/L0NXHcsA/

Par contre je ne comprends pas "les saisies s'actualisent", l'enregistrement étant en PDF il ne peut y avoir d'actualisation ?

Cdlmnt

oui, je parle des résultats de ta première Macro.
Bon j'essaye avec ce que tu viens de m'envoyer.

Merci.