Millisecondes depuis 1970

Réponse acceptée !
Bonjour,

Datediff (à conditon de partir d'une date et d'une heure précises et précisées) permettrait de calculer le nombre de secondes écoulées depuius ces date et heure jusu'à maintenant (Now).
Le nombre de sesondes serait par contre probablement en dehors des limites d'un Long et il faudrait alors le calculer et l'exprimer à l'aide de puissances de 10. Celui des millisecondes serait exprimé de la même manière, en multipliant par 1000)...

Et... tu veux calculer ces millisecondes depuis 1970 dans quel but ?
Les millisecondes m'intéressent car, en plus, le temps de calcul et d'affichage lui-même rendrait le décompte imprécis ....

Réponse acceptée !
a cet endroit :
http://www.codyx.org/snippet_transformer-stamp-vers-date-vice-versa_73.aspx

j'avais fait:
Public Function StampToDate(ByVal vnStamp As Long) As Date
    StampToDate = DateAdd("s", vnStamp, #1/1/1970#)
End Function

Public Function DateToStamp(ByVal vdDate As Date) As Long
    DateToStamp = DateDiff("s", #1/1/1970#, vdDate)
End Function