Bonjour
Il m'arrive de metre a jour régulierement un fichier excel
comment peut on inserer dans une case d'Excel automatiquement la date en cours au moment de la fermeture de celui ci
je sais que celle ci apparait automatiquement dans les propriétés du fichier quand on l'enregistre mais si on ne modifie pas le fichier,il reste à l'ancienne date.
merci
J'ai utilisé la fonction MAINTENANT mais elle ne m'affiche que la date actuelle en cours.

Salut bororo

peut-être une petite macro

dans ThisWorkbook

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("Feuil1").Select
Range("A4").Select
Selection.Value = Date
End Sub

Bonne journée

Bonjour
Pour l'automatisme je ne sais pas mais pour rappel (que beaucoup connaissent je pense):
les touches :
CTRL/SHIFT et POINT VIRGULE
appuyées simultanément dans Excel mettent automatiquement la date du jour dans la case.

Salut,
Si j'ai bien pigé la question (pas certain, doute entre la date du jour et la date de la dernière ouverture)

Sélectionner la cellule et saisir la formule :

Code: Tout sélectionner

=Aujourdhui()

merci de vos reponses
pour la macro de JPbricole,je n'ai hélas rien compris donc si tu peux me donner la manière de proceder merci.
pour les 2 autres réponses,j'ai sans doute été incomplet:
je voudrais ,quand j'ouvre mon fichier Excel,que s'affiche dans une cellule:dernière mise à jour le "jj/mm/année"
merci

Erbo a écrit:CTRL/SHIFT et POINT VIRGULE
appuyées simultanément dans Excel mettent automatiquement la date du jour dans la case.

Salut
Je pense que c'est simplement l'appui sur les touches CTRL POINT VIRGULE qui remplissent cette fonction.(sans SHIFT)

Salut bororo
Je ne sais pas quel Excel tu utilises ni quel est ton niveau de conaissance en ce qui concerne les macro.
Pour répondre à ton désire, une macro est quasiment indispensable c'est pourquoi il est nécessaire de te renseigner à ce propos.
J'explique le fonctionnement de ma proposition (Légèrement modifiée):

Avant d'afficher la date à l'ouverture, il faut la noter au moment de l'enregistrement.
Celà se produit à chaque fois que tu sauveras ton document.
La sauvegarde provoque, au niveau de ton document (ThisWorkbook), un événement Workbook_BeforeSave
C'est à ce moment que la macro met dans une cellule la date et l'heure.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Worksheets("Feuil1").Range("C4").Value = Format(Date, "yy mmmm yyyy") & " " & Format(Now, "hh:mm:ss")
End Sub

Ainsi à chaque sauvegarde la date sera mise à jour.
A chaque ouverture tu retrouves la date dans Feuil1 cellule C4.

PS: je ne sait pas comment, mais je peux te faire parvenir une feuille Excel exemple.

utilise la fonction date: aller dans le menu Insertion "fonction" rechercher "date" "aujourdh'ui" la cellule est configurée pour afficher la date du jour. C'est ce que je fais dans Open Office mais c'est identique avec Excel.
Amicalement,
Luc

JpBbricole a écrit:Salut bororo


Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Worksheets("Feuil1").Range("C4").Value = Format(Date, "yy mmmm yyyy") & " " & Format(Now, "hh:mm:ss")
End Sub

Ainsi à chaque sauvegarde la date sera mise à jour.
A chaque ouverture tu retrouves la date dans Feuil1 cellule C4.

PS: je ne sait pas comment, mais je peux te faire parvenir une feuille Excel exemple.

Salut
Merci de ta réponse.
Bien sur,je n'ai pas reusi a la faire fonctionner car je suis un peu nul
alors j'accepte avec plaisir que tu me fasses passer une feuille Excel avec la formule incluse.
A plus et merci encore

Salut bororo
A ta disposition sur http://cjoint.com/?1dFiUmMoyhd

j'ai fait quelques changements par rapport à l'original.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Worksheets("Feuil1").Range("C4").Value = Format(Now, "dd.mmmm.yyyy hh:mm:ss")
End Sub


Bonne journée

salut Jpbricole
effectivement,apres avoir désactivé ou du moins changé le niveau de securité de la feuille Excel,la macro a fonctionné parfaitement.
Par contre,je suppose que je dois recopier cette macro dans la case de mon choix.
Ou se trouve t'elle?
Car je ne l'ai pas trouvée dans la feuille.Dois je remplacer les variables de cette macro(Feuil1,C4,dd,mmmm,yyyy,hh:mm:ss)?
Je dois dire que je patauge un peu.
Merci de ta patience.
PS
apres avoir farfouillé,j'ai trouvé la description de la macro.j'ai fait un test en changeant la case C4 et ça fonctionne.
maintenant,je vais essayer de recopier la formule sur une autre feuille ou au pire,je recopie ma feuille Excel sur celle que tu m'as envoyée avec la macro integrée...

Salut bororo
Les macros ne se trouvent pas dans des cellules mais sont accessibles par la le menu:
Excel 2007 Onglet Développeur / Visualiser le code
Excel 2003 Outils / Macro / Visual Basic Editor

En effet, on ne traite pas une cellule mais un événement qui se produit au niveau du Classeur (ThisWorkbook)
Le fait de sauver ce classeur, provque, à son niveau, un événement appelé Workbook_BeforeSave.
Ce genre de traitement ne se traite qu'au niveau des macros.

A gauche doubleclick sur l'objet ThisWorkbook
En haut à droite, selectionne l'événement BeforeClose dans la ListBox de droite
La macro se trouve ici

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Worksheets("Feuil1").Range("C4").Value = Format(Now, "dd.mmmm.yyyy hh:mm:ss")
End Sub

Pour paramètrer le feuille ou la cellule de destination, je pense que c'est assez clair.

Ouf!j'ai reussi
merci de ton aide précieuse
A plus

Bonjour à toutes et tous,

une petite question complémentaire par apport au précédent problème.
En colonne A (mais sur toute la colonne A !), je voudrais avoir la date du jour de saisie, sans que cette dernière ne se mette à jour (répertoire de l'ensemble des appels reçus sur l'année avec la date bien sûr). Étant très peu utilisateur des codes, pouvez-vous m'aidez ?

Merci d'avance.

Samy26