OVH Cloud OVH Cloud

Date de naissance et aujourd'hui

4 réponses
Avatar
Didier Novarin
Bonjour
J'ai un textbox et un label sur un userform
Je souhaite qu'après avoir saisi une date jj/mm/aa puis avec l'évènement
after update
dans mon label j'ai le nombre d'années de mois et de jours par rapport à
aujourd'hui
ceci afin de vérifier que la saisie soit cohérente.
Je vous remercie
Didier

4 réponses

Avatar
Pegaze
essai ca
TextBox2.Value = CDate(TextBox1.Value) - Now() ou
Label1.Caption = CDate(TextBox1.Value) - Now()

==> nbre de jour entre la date saisie et aujourdhui et tu adaptes


Bonjour
J'ai un textbox et un label sur un userform
Je souhaite qu'après avoir saisi une date jj/mm/aa puis avec l'évènement
after update
dans mon label j'ai le nombre d'années de mois et de jours par rapport à
aujourd'hui
ceci afin de vérifier que la saisie soit cohérente.
Je vous remercie
Didier





Avatar
Jacques93
Bonjour Didier Novarin

Peut être :

Dim y As Integer, m As Integer, d As Integer
Dim dt As Date, s As String

dt = CDate(Me.TextBox1.Text)
y = DateDiff("yyyy", dt, Now)
s = y & " année(s) "
dt = DateAdd("yyyy", y, dt)
m = DateDiff("m", dt, Now)
If DateAdd("m", m, dt) > Now Then m = m - 1
s = s & m & " mois "
dt = DateAdd("m", m, dt)
d = DateDiff("d", dt, Now)
s = s & d & " jour(s)"
MsgBox s

Quelqu'un est peut il expliquer pourquoi Datediff, renvoie parfois un
nombre de mois erroné ?

Bonjour
J'ai un textbox et un label sur un userform
Je souhaite qu'après avoir saisi une date jj/mm/aa puis avec l'évènement
after update
dans mon label j'ai le nombre d'années de mois et de jours par rapport à
aujourd'hui
ceci afin de vérifier que la saisie soit cohérente.
Je vous remercie
Didier





--
Cordialement,

Jacques.

Avatar
Jacques93
[...]

Quelqu'un est peut il expliquer pourquoi Datediff, renvoie parfois un
nombre de mois erroné ?



Question annulée, si on prends par exemple le nombre de mois entre le
25/07/2005 et le 15/10/2005, DateDiff renvoie 3 (10 - 7), c'est à dire
aout, septembre, octobre, même si ce ne sont pas 3 mois complets.

--
Cordialement,

Jacques.

Avatar
Didier Novarin
Merci beaucoup à tous les 2
Je garde la procédure de Jacques93 ;-)
Excellent
Didier

"Jacques93" a écrit dans le message de news:

[...]

Quelqu'un est peut il expliquer pourquoi Datediff, renvoie parfois un
nombre de mois erroné ?



Question annulée, si on prends par exemple le nombre de mois entre le
25/07/2005 et le 15/10/2005, DateDiff renvoie 3 (10 - 7), c'est à dire
aout, septembre, octobre, même si ce ne sont pas 3 mois complets.

--
Cordialement,

Jacques.