transformer =AUJOURDHUI() en date fixe après un enregistrement sous.

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Kantarus

XLDnaute Nouveau
Bonjour tout le monde,

Y a t'il une possibilité de garder une date créer par la fonction =AUJOURDHUI() en date fixe après une sauvegarde sous, du fichier ?

Merci
 
Bonsour®
Bonjour tout le monde,

Y a t'il une possibilité de garder une date créer par la fonction =AUJOURDHUI() en date fixe après une sauvegarde sous, du fichier ?

Merci
Créer une cellule quelconque que vous nommerez :
DateSave
pour y entrer la date du jour , tapez : Ctrl +
Dans le classeur remplacez la formule :
=AUJOURDHUI()
par :
=DateSave

ceci pourrait être effectué également par une proc événementielle sous VBA
 
Bonjour le fil, bonjour le forum,

Une autre option (nom d'onglet et cellule à adapter):

VB:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If SaveAsUI = True Then .Copy
    With Sheets("Feuil1")
        .Range("A1").Copy
        .Range("A1").PasteSpecial Paste:=xlPasteValues
    End With
End If
End Sub
 
Bon je comprend plus rien, je viens de refaire le Ctrl+; , et maintenant cela a fonctionné....

Je suis à la recherche d'un exorciste pour PC sous windows 10.....
Oupsss ...!
Ctrl + . (Contrôle et point) pour la date
Ctrl + : (Controle et ":") pour l'heure

"." ou ";" pour la date
":" ou "/" pour l'heure
c'est le code touche qui compte
ne pas actionner la touche "Shift" ou "Maj" pendant cette action
 
Dernière édition:
Re à tous

@Modeste geedee : pour avoir le point-virgule, il faut tenir aussi la touche Shift (clavier querty).
😉 eh oui , même que sur Mac on ne parle pas de Ctrl
mais de
upload_2018-9-14_17-48-25.png


sur clavier PC AZERTY :
Shift n'a pas à intervenir....majuscule ou pas
c'est la touche qui compte !!!
Ctrl +
". "ou ";" pour la date
"/" ou":" pour l'heure

évidement sur un clavier QWERTY ....
le ":" et le ";" sont sur la même touche
upload_2018-9-14_17-42-37.png


ce que l'on constate via le VBA on n'y parle pas de SHIFT

via VBA :
VB:
Sub toto()
SendKeys "^;"
SendKeys "{enter}"
SendKeys "^:"
SendKeys "{enter}"
End Sub

upload_2018-9-14_17-2-12.png

😎🙄
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
22
Affichages
654
Réponses
3
Affichages
151
Retour