Bonjour
Si la cellule de destination a bien un format date (propriété de
cellule), ceci fonctionne (sur l'événement perte de focus du DateField
par exemple):
Sub AfficheDate
doc=thisComponent
feuille=doc.sheets.getByName("exo14")
celluleDest=feuille.getCellRangeByName("B19")
formulaire=feuille.drawpage.forms.getByName("Standard")
champDate=formulaire.getByName("DateField").CurrentValue
'transformer date
annee=left(champDate,4)
mois=mid(champDate,5,2)
jour=right(champDate,2)
celluleDest.setValue(dateserial(annee,mois,jour))
End Sub
-------------
Pascal PIERRE
-----Message d'origine-----
De : Arnaud POUSSIER [mailto:[EMAIL PROTECTED]
Envoyé : mercredi 30 janvier 2008 18:51
À : OpenOffice Prog fr
Objet : [prog] Calc et DateField
Bonjour,
une petite question :
sur une feuille calc, j'ai mit un "DateField", avec "déroulante".
Comment puis-je avoir le résultat dans une case de ma feuille.
Merci d'avance et bonne soirée
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
