Bonnes fetes a tous !
Je refais appel a votre precieuse pour regler un probleme que je rencontre actuellement sur excel 2013 (en version anglaise). J'ai des cellules contenant plusieurs dates et une fonction qui me donne la plus ancienne de ces date. Je pense que la fonction repere bien la date la plus ancienne mais ne la recrit pas dans le bon format => ca donne n'importe quoi !
Je vous ai joint un petit exemple
La fonction est la suivante :
Function ancienneDate(dates As String) As Date
Dim tablDat, d1, dat As Date, i As Long
tablDat = Split(dates, vbLf)
ancienneDate = #12/31/9999#
For i = 0 To UBound(tablDat)
d1 = Split(tablDat(i), "/")
dat = DateSerial(d1(2), d1(0), d1(1))
If dat < ancienneDate Then ancienneDate = CDate(dat)
Next i
End Function
On sent bien qu'il y a un probleme dans la definition de la variable "ancienneDate", j'ai essaye d'inverser le mois/jour en jour/mois mais ce ne veut pas (ca remet automatiquement en mois/jour). Y a-t-il un moyen de "casser" cette pre determination du format de date ?
Je vous remercie de votre aide. N'hesitez pas a me demander si vous avez besoin d'autres informations.