Re : [fr-users] Re: [calc] insertion de date

Merci beaucoup : 

j'avais trouvé ceci  (http://user.services.openoffice.org/fr/forum/ftopic1132.html)
---------
Sub InsertDate
       Dim aLocale as new com.sun.star.lang.Locale, vNumFormat
       Dim oDoc as Object : oDoc = ThisComponent
       Dim oCell as Object : oCell = oDoc.CurrentSelection
       Dim sFormat as String : sFormat = "JJ MMMM AAAA"
       If oCell.supportsService( "com.sun.star.sheet.SheetCell" ) Then
          oCell.setValue( Now() )
          vNumFormat = oDoc.getNumberFormats().queryKey( sFormat, aLocale, TRUE )
          If ( vNumFormat = -1 ) Then
             vNumFormat = oDoc.getNumberFormats().addNew( sFormat, aLocale )
          End If
          oCell.NumberFormat = vNumFormat
       End If
    End Sub
--------------------------------------
que l'on peut appeler par un bouton
je me disait qu'on pouvait peut-être en faire une fonction... mais là je sèche ! il y a longtemps 
que je ne me suis pas replongé dans OOoBasic.

Rémy


Le 07/06/12, pierre-yves samyn  <pierre-yves.samyn@laposte.net> a écrit :
> Bonjour
>
> 3 "trucs" communément utilisés :
>
> 1.  Définir une plage de validité sur la cellule concernée. 
> - Source : plage de cellule
> - Plage : TEXTE(AUJOURDHUI();"JJ/MM/AA")
>
> La liste déroulante affichera donc la date du jour (par défaut en nombre)
> formatée
> avec la fonction TEXTE comme on le souhaite. La fonction AUJOURDHUI()
> ne figurant pas dans la cellule, cette dernière ne sera pas recalculée.
>
> 2. Utiliser le raccourci-clavier par défaut pour saisir la date du jour :
> Ctrl+;
>
> 3. Dessiner un contrôle de formulaire
>
> Afficher la barre d'outils correspondante, puis dans cette barre cliquer
> sur l'outil "autres contrôles" afin d'afficher une barre supplémentaire dans
> laquelle on peut choisir l'outil "Champ de date".
>
> Dessiner le contrôle puis définir sa propriété  "Déroulante" à Oui
> On dispose désormais d'un calendrier en cliquant sur la flèche permettant de 
> dérouler le contrôle.
>
> Nota : il n'est pas possible (hors programmation) d'associer la date
> sélectionnée 
> par l'utilisateur à une cellule. Cette technique ne peut donc servir dans
> les cas de 
> figure où l'on a besoin de la date dans d'autres formules.
>
> Le classeur joint reprend ces techniques 
> http://nabble.documentfoundation.org/file/n3988720/DateJour.ods DateJour.ods 
>
> Cordialement
> Pierre-Yves
>
> --
> View this message in context: 
> http://nabble.documentfoundation.org/calc-insertion-de-date-tp3988714p3988720.html
> Sent from the Users mailing list archive at Nabble.com.
>
> -- 
> Envoyez un mail à users+help@fr.libreoffice.org pour savoir comment vous désinscrire
> Les archives de la liste sont disponibles à http://listarchives.libreoffice.org/fr/users/
> Tous les messages envoyés sur cette liste seront archivés publiquement et ne pourront pas être 
> supprimés
--
Bien cordialement

Signe : Rémy PETIT

-- 
Envoyez un mail à users+help@fr.libreoffice.org pour savoir comment vous désinscrire
Les archives de la liste sont disponibles à http://listarchives.libreoffice.org/fr/users/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne pourront pas être 
supprimés