Fonctions Cdate et Cstr

Marsh Posté le 19-12-2010 à 20:05:37

Bonsoir,
Dans le cadre de mon pricer d'options j'ai codé la formule suivante :
Function Maturité()
DateTexte = CStr(Jour.Value) & "/" & Mois.Value & "/" & CStr(Contenu_Année.Value)
Maturité = (CDate(DateTexte) - Date) / 365
End Function

Seulement elle ne fonctionne pas sous excel 2010 et winseven 64 bits , ça à un rapport avec ces versions ou j'ai merdé quelque part?
merci

Marsh Posté le 19-12-2010 à 20:05:37

Marsh Posté le 20-12-2010 à 10:50:06

Peut-être qu'il faudrait aussi convertir le mois :

DateTexte = CStr(Jour.Value) & "/" & CStr(Mois.Value) & "/" & CStr(Contenu_Année.Value)

Peut-être que ce serait dû aux options linguistiques sur le poste. Voir le panneau de configuration.

Marsh Posté le 22-12-2010 à 11:23:09

Si tu nous disais plutot ce que tu veux ?

Que renvoient tes valeurs ? Du texte ? Des nombres ?

Sinon, tu peux aussi utiliser la fonction DateDiff bien pratique pour calculer des intervals de date.

Code :

Function Maturité()
Jour = 5
Mois = 12
Contenu_Année = 2008
DateVal = CDate(CStr(Jour) & "/" & Mois & "/" & CStr(Contenu_Année))
Maturité = DateDiff("yyyy", DateVal, Date, 2, 2)
End Function

Maturité renvoie bien 2

---------------
Soyez malin, louez entre voisins !

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *