[Résolu][Calc] Insérer la date de la dernière modification

Discussions et questions sur tout ce qui concerne la programmation tous langages et tous modules confondus.

Modérateur : Vilains modOOs

Règles du forum
:alerte: Balisage obligatoire dans cette section !
Aidez-nous à vous aider au mieux en balisant correctement votre question : reportez-vous sur les règles de cette section avant de poster !
clduick
Membre lOOyal
Membre lOOyal
Messages : 42
Inscription : 10 oct. 2007 12:36
Localisation : Paris

[Résolu][Calc] Insérer la date de la dernière modification

Message par clduick »

Dans un classeur de calcul, je sais afficher la date du jour, ça, c'est facile.

Par contre ce que j'aimerai c'est afficher la date de la dernière modification.

En fait c'est pour un listing du personnel que plusieurs collègues utilisent. Ils ne le modifient pas toujours, et justement, savoir à l'ouverture du document la date de la dernière modification serait très utile.

Est ce possible ?

Si oui comment ? Macro ou formule ??

Merci à ceux qui prendront le temps de me répondre.
Dernière modification par clduick le 26 mars 2008 09:21, modifié 1 fois.
LibreOffice 7.1 sous W10 Obligation de Version
Avatar de l’utilisateur
Dude
IdOOle de la suite
IdOOle de la suite
Messages : 25994
Inscription : 03 mars 2006 07:45
Localisation : 127.0.0.1

Message par Dude »

Il me semble t'avoir donné une réponse :
Dude a écrit :Fais une recherche sur l'objet DocumentInfo et XRay pour voir les propriétés disponibles.
:x
Poser une question, c'est bien. Répondre aux autres, c'est encore mieux.
Améliorez AOO et votez pour les issues
clduick
Membre lOOyal
Membre lOOyal
Messages : 42
Inscription : 10 oct. 2007 12:36
Localisation : Paris

pb résolu par une astuce

Message par clduick »

pb résolu simplement par une macro enregistrée + une formule.

merci quand même pour ton aide :roll:

:wink:
LibreOffice 7.1 sous W10 Obligation de Version
Avatar de l’utilisateur
chater
Membre cOOnfirmé
Membre cOOnfirmé
Messages : 237
Inscription : 21 févr. 2006 13:43
Localisation : Paname

Re: pb résolu par une astuce

Message par chater »

clduick a écrit :pb résolu simplement par une macro enregistrée + une formule.
Salut,

Je serais curieux de voir cela. Quelle formule as-tu utilisé ?
OOo 3.1 officielle sous Ubuntu 9.04

Pensez à aider les autres en répondant à leurs questions.
clduick
Membre lOOyal
Membre lOOyal
Messages : 42
Inscription : 10 oct. 2007 12:36
Localisation : Paris

voici la manip

Message par clduick »

exemple pour mon fichier calcul:

dans une première cellule insérer la fonction "aujourd'hui()"

ensuite choisir une autre cellule du fichier où vous souhaitez indiquer la date de la derniere modification du document.

faire ouitils macro enregistrer et exécuter la manip suivante:
copier la cellule où il y a la fonction "aujourd'hui()
puis collage spécial "NOMBRE" dans la cellule de destination
enregistrer la macro

et enfin l assigner à l enregistrement du document.

Voilà tu as vu !!!!
:P
LibreOffice 7.1 sous W10 Obligation de Version
Avatar de l’utilisateur
chater
Membre cOOnfirmé
Membre cOOnfirmé
Messages : 237
Inscription : 21 févr. 2006 13:43
Localisation : Paname

Message par chater »

Re,
J'ai vu mais je te propose ce que Dude te préconise.
En utilisant DocumentInfo, tu arrives également à la même chose avec certainement moins de lignes. Si tu utilises XRay, tu verras que tu as la propriété CreateDate et ModifyDate.
Voici ma solution :

Code : Tout sélectionner

	oClasseur = ThisComponent
	oDate = oClasseur.DocumentInfo.ModifyDate 
	afficheDate = oDate.Day & "/" & oDate.Month & "/" & oDate.Year & _
	 " à " & oDate.Hours & ":" & oDate.Minutes & ":" & oDate.Seconds
	msgbox "Fichier modifié : " & afficheDate
OOo 3.1 officielle sous Ubuntu 9.04

Pensez à aider les autres en répondant à leurs questions.
clduick
Membre lOOyal
Membre lOOyal
Messages : 42
Inscription : 10 oct. 2007 12:36
Localisation : Paris

Message par clduick »

je suis peut être d accord avec toi, mais il faut se mettre a mon niveau, je ne sais pas éditer de macro. Honte a moi peut etre mais c est comme cela.

Donc j essaye comme je peux pour trouver des solutions.

merci @+

:wink: :wink:
LibreOffice 7.1 sous W10 Obligation de Version