Bonsoir, Bonsoir,
Dans cette macro, je voudrais faire apparaître
dans mon MsgBox :
Le mercredi 18 février 2009 au lieu de 18/02/09
Le lundi 29 décembre 2042 au lieu de 29/12/2042
33 ans 11 mois 9 jours au lieu de 09/11/33
Bonsoir, Bonsoir,
Dans cette macro, je voudrais faire apparaître
dans mon MsgBox :
Le mercredi 18 février 2009 au lieu de 18/02/09
Le lundi 29 décembre 2042 au lieu de 29/12/2042
33 ans 11 mois 9 jours au lieu de 09/11/33
Bonsoir, Bonsoir,
Dans cette macro, je voudrais faire apparaître
dans mon MsgBox :
Le mercredi 18 février 2009 au lieu de 18/02/09
Le lundi 29 décembre 2042 au lieu de 29/12/2042
33 ans 11 mois 9 jours au lieu de 09/11/33
Bonsoir, Bonsoir,
Dans cette macro, je voudrais faire apparaître
dans mon MsgBox :
Le mercredi 18 février 2009 au lieu de 18/02/09
Le lundi 29 décembre 2042 au lieu de 29/12/2042
33 ans 11 mois 9 jours au lieu de 09/11/33
Bonsoir, Bonsoir,
Dans cette macro, je voudrais faire apparaître
dans mon MsgBox :
Le mercredi 18 février 2009 au lieu de 18/02/09
Le lundi 29 décembre 2042 au lieu de 29/12/2042
33 ans 11 mois 9 jours au lieu de 09/11/33
Bonsoir, Bonsoir,
Dans cette macro, je voudrais faire apparaître
dans mon MsgBox :
Le mercredi 18 février 2009 au lieu de 18/02/09
Le lundi 29 décembre 2042 au lieu de 29/12/2042
33 ans 11 mois 9 jours au lieu de 09/11/33
Ave,
Dans une feuille de calcul, je formate A1 et B1
"Le " jjjj j mmmm aaaa
J'entre 18/02/2009 en A1et j'obtiens ce que je veux :
1) Le mercredi 18 février 2009
En B1, j'entre ¡+12367 et j'obtiens ce que je veux :
2 ) Le lundi 29 décembre 2042
Je formate C1
aa" ans " m" mois" j" jour(s)"
j'entre ±-C1 et j'obtiens :
3) 33 ans 11 mois 9 jour(s)
Si j'utilise la macro avec temps = dc - dd,
les résultats 1) et 2) coïncident avec les tiens
mais elle renvoie 33 ans 10 mois 9 jour(s).
Qui a raison, 3) ou toi ?
Et si j'utilise la macro avec temps = AGE(dd, dc),
je reçois le message « Incompatibilité de type »
et le débogage me renvoie à :
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""y""")
Quel fouillis pour mes petites méninges ;-)
A+
Serge
"Modeste" a écrit dans le message de news:
Bonsour® garnoteBonsoir, Bonsoir,
Dans cette macro, je voudrais faire apparaître
dans mon MsgBox :
Le mercredi 18 février 2009 au lieu de 18/02/09
Le lundi 29 décembre 2042 au lieu de 29/12/2042
33 ans 11 mois 9 jours au lieu de 09/11/33
MsgBox "Date de départ :" & vbLf & Format(dd ,"dd mmmm yyyy") & vbLf _
& "Date de la chute :" & vbLf & Format(dc, "dd mmmm yyyy") & vbLf _
& "Temps requis :" & vbLf & (year(temps)-1900) & " ans " & month(temps)-1 &" mois " & day(temps) &" jour(s)"
!!!!!
Attention je doute du age=onze mois tiré d'un format de date ;o)))
i.e le 01/01/33 le temps est 1 jour et non 1 mois et 1 jours
voir à utiliser datedif
temps=age(dd,dc)
Function AGE(Date1 As Date, Date2 As Date) As String
Dim Elt As Long, D1 As Long, D2 As Long
D1 = Int(Date1): D2 = Int(Date2)
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""y""")
AGE = Elt & IIf(Elt > 1, " ans, ", " an,") & _
Evaluate("DATEDIF(" & D1 & "," & D2 & ",""ym""") & " mois, "
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""md""")
AGE = AGE & Elt & IIf(Elt > 1, " jours", " jour")
End Function
Ave,
Dans une feuille de calcul, je formate A1 et B1
"Le " jjjj j mmmm aaaa
J'entre 18/02/2009 en A1et j'obtiens ce que je veux :
1) Le mercredi 18 février 2009
En B1, j'entre ¡+12367 et j'obtiens ce que je veux :
2 ) Le lundi 29 décembre 2042
Je formate C1
aa" ans " m" mois" j" jour(s)"
j'entre ±-C1 et j'obtiens :
3) 33 ans 11 mois 9 jour(s)
Si j'utilise la macro avec temps = dc - dd,
les résultats 1) et 2) coïncident avec les tiens
mais elle renvoie 33 ans 10 mois 9 jour(s).
Qui a raison, 3) ou toi ?
Et si j'utilise la macro avec temps = AGE(dd, dc),
je reçois le message « Incompatibilité de type »
et le débogage me renvoie à :
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""y""")
Quel fouillis pour mes petites méninges ;-)
A+
Serge
"Modeste" <GD@libre.fr> a écrit dans le message de news: ORUpGDTkJHA.4696@TK2MSFTNGP02.phx.gbl...
Bonsour® garnote
Bonsoir, Bonsoir,
Dans cette macro, je voudrais faire apparaître
dans mon MsgBox :
Le mercredi 18 février 2009 au lieu de 18/02/09
Le lundi 29 décembre 2042 au lieu de 29/12/2042
33 ans 11 mois 9 jours au lieu de 09/11/33
MsgBox "Date de départ :" & vbLf & Format(dd ,"dd mmmm yyyy") & vbLf _
& "Date de la chute :" & vbLf & Format(dc, "dd mmmm yyyy") & vbLf _
& "Temps requis :" & vbLf & (year(temps)-1900) & " ans " & month(temps)-1 &" mois " & day(temps) &" jour(s)"
!!!!!
Attention je doute du age=onze mois tiré d'un format de date ;o)))
i.e le 01/01/33 le temps est 1 jour et non 1 mois et 1 jours
voir à utiliser datedif
temps=age(dd,dc)
Function AGE(Date1 As Date, Date2 As Date) As String
Dim Elt As Long, D1 As Long, D2 As Long
D1 = Int(Date1): D2 = Int(Date2)
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""y""")
AGE = Elt & IIf(Elt > 1, " ans, ", " an,") & _
Evaluate("DATEDIF(" & D1 & "," & D2 & ",""ym""") & " mois, "
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""md""")
AGE = AGE & Elt & IIf(Elt > 1, " jours", " jour")
End Function
Ave,
Dans une feuille de calcul, je formate A1 et B1
"Le " jjjj j mmmm aaaa
J'entre 18/02/2009 en A1et j'obtiens ce que je veux :
1) Le mercredi 18 février 2009
En B1, j'entre ¡+12367 et j'obtiens ce que je veux :
2 ) Le lundi 29 décembre 2042
Je formate C1
aa" ans " m" mois" j" jour(s)"
j'entre ±-C1 et j'obtiens :
3) 33 ans 11 mois 9 jour(s)
Si j'utilise la macro avec temps = dc - dd,
les résultats 1) et 2) coïncident avec les tiens
mais elle renvoie 33 ans 10 mois 9 jour(s).
Qui a raison, 3) ou toi ?
Et si j'utilise la macro avec temps = AGE(dd, dc),
je reçois le message « Incompatibilité de type »
et le débogage me renvoie à :
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""y""")
Quel fouillis pour mes petites méninges ;-)
A+
Serge
"Modeste" a écrit dans le message de news:
Bonsour® garnoteBonsoir, Bonsoir,
Dans cette macro, je voudrais faire apparaître
dans mon MsgBox :
Le mercredi 18 février 2009 au lieu de 18/02/09
Le lundi 29 décembre 2042 au lieu de 29/12/2042
33 ans 11 mois 9 jours au lieu de 09/11/33
MsgBox "Date de départ :" & vbLf & Format(dd ,"dd mmmm yyyy") & vbLf _
& "Date de la chute :" & vbLf & Format(dc, "dd mmmm yyyy") & vbLf _
& "Temps requis :" & vbLf & (year(temps)-1900) & " ans " & month(temps)-1 &" mois " & day(temps) &" jour(s)"
!!!!!
Attention je doute du age=onze mois tiré d'un format de date ;o)))
i.e le 01/01/33 le temps est 1 jour et non 1 mois et 1 jours
voir à utiliser datedif
temps=age(dd,dc)
Function AGE(Date1 As Date, Date2 As Date) As String
Dim Elt As Long, D1 As Long, D2 As Long
D1 = Int(Date1): D2 = Int(Date2)
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""y""")
AGE = Elt & IIf(Elt > 1, " ans, ", " an,") & _
Evaluate("DATEDIF(" & D1 & "," & D2 & ",""ym""") & " mois, "
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""md""")
AGE = AGE & Elt & IIf(Elt > 1, " jours", " jour")
End Function
Ave,
Dans une feuille de calcul, je formate A1 et B1
"Le " jjjj j mmmm aaaa
J'entre 18/02/2009 en A1et j'obtiens ce que je veux :
1) Le mercredi 18 février 2009
En B1, j'entre ¡+12367 et j'obtiens ce que je veux :
2 ) Le lundi 29 décembre 2042
Je formate C1
aa" ans " m" mois" j" jour(s)"
j'entre ±-C1 et j'obtiens :
3) 33 ans 11 mois 9 jour(s)
Si j'utilise la macro avec temps = dc - dd,
les résultats 1) et 2) coïncident avec les tiens
mais elle renvoie 33 ans 10 mois 9 jour(s).
Qui a raison, 3) ou toi ?
Et si j'utilise la macro avec temps = AGE(dd, dc),
je reçois le message « Incompatibilité de type »
et le débogage me renvoie à :
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""y""")
Quel fouillis pour mes petites méninges ;-)
A+
Serge
"Modeste" a écrit dans le message de news:
Bonsour® garnoteBonsoir, Bonsoir,
Dans cette macro, je voudrais faire apparaître
dans mon MsgBox :
Le mercredi 18 février 2009 au lieu de 18/02/09
Le lundi 29 décembre 2042 au lieu de 29/12/2042
33 ans 11 mois 9 jours au lieu de 09/11/33
MsgBox "Date de départ :" & vbLf & Format(dd ,"dd mmmm yyyy") & vbLf _
& "Date de la chute :" & vbLf & Format(dc, "dd mmmm yyyy") & vbLf _
& "Temps requis :" & vbLf & (year(temps)-1900) & " ans " & month(temps)-1 &" mois " & day(temps) &" jour(s)"
!!!!!
Attention je doute du age=onze mois tiré d'un format de date ;o)))
i.e le 01/01/33 le temps est 1 jour et non 1 mois et 1 jours
voir à utiliser datedif
temps=age(dd,dc)
Function AGE(Date1 As Date, Date2 As Date) As String
Dim Elt As Long, D1 As Long, D2 As Long
D1 = Int(Date1): D2 = Int(Date2)
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""y""")
AGE = Elt & IIf(Elt > 1, " ans, ", " an,") & _
Evaluate("DATEDIF(" & D1 & "," & D2 & ",""ym""") & " mois, "
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""md""")
AGE = AGE & Elt & IIf(Elt > 1, " jours", " jour")
End Function
Ave,
Dans une feuille de calcul, je formate A1 et B1
"Le " jjjj j mmmm aaaa
J'entre 18/02/2009 en A1et j'obtiens ce que je veux :
1) Le mercredi 18 février 2009
En B1, j'entre ¡+12367 et j'obtiens ce que je veux :
2 ) Le lundi 29 décembre 2042
Je formate C1
aa" ans " m" mois" j" jour(s)"
j'entre ±-C1 et j'obtiens :
3) 33 ans 11 mois 9 jour(s)
Si j'utilise la macro avec temps = dc - dd,
les résultats 1) et 2) coïncident avec les tiens
mais elle renvoie 33 ans 10 mois 9 jour(s).
Qui a raison, 3) ou toi ?
Et si j'utilise la macro avec temps = AGE(dd, dc),
je reçois le message « Incompatibilité de type »
et le débogage me renvoie à :
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""y""")
Quel fouillis pour mes petites méninges ;-)
A+
Serge
"Modeste" <GD@libre.fr> a écrit dans le message de news: ORUpGDTkJHA.4696@TK2MSFTNGP02.phx.gbl...
Bonsour® garnote
Bonsoir, Bonsoir,
Dans cette macro, je voudrais faire apparaître
dans mon MsgBox :
Le mercredi 18 février 2009 au lieu de 18/02/09
Le lundi 29 décembre 2042 au lieu de 29/12/2042
33 ans 11 mois 9 jours au lieu de 09/11/33
MsgBox "Date de départ :" & vbLf & Format(dd ,"dd mmmm yyyy") & vbLf _
& "Date de la chute :" & vbLf & Format(dc, "dd mmmm yyyy") & vbLf _
& "Temps requis :" & vbLf & (year(temps)-1900) & " ans " & month(temps)-1 &" mois " & day(temps) &" jour(s)"
!!!!!
Attention je doute du age=onze mois tiré d'un format de date ;o)))
i.e le 01/01/33 le temps est 1 jour et non 1 mois et 1 jours
voir à utiliser datedif
temps=age(dd,dc)
Function AGE(Date1 As Date, Date2 As Date) As String
Dim Elt As Long, D1 As Long, D2 As Long
D1 = Int(Date1): D2 = Int(Date2)
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""y""")
AGE = Elt & IIf(Elt > 1, " ans, ", " an,") & _
Evaluate("DATEDIF(" & D1 & "," & D2 & ",""ym""") & " mois, "
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""md""")
AGE = AGE & Elt & IIf(Elt > 1, " jours", " jour")
End Function
Ave,
Dans une feuille de calcul, je formate A1 et B1
"Le " jjjj j mmmm aaaa
J'entre 18/02/2009 en A1et j'obtiens ce que je veux :
1) Le mercredi 18 février 2009
En B1, j'entre ¡+12367 et j'obtiens ce que je veux :
2 ) Le lundi 29 décembre 2042
Je formate C1
aa" ans " m" mois" j" jour(s)"
j'entre ±-C1 et j'obtiens :
3) 33 ans 11 mois 9 jour(s)
Si j'utilise la macro avec temps = dc - dd,
les résultats 1) et 2) coïncident avec les tiens
mais elle renvoie 33 ans 10 mois 9 jour(s).
Qui a raison, 3) ou toi ?
Et si j'utilise la macro avec temps = AGE(dd, dc),
je reçois le message « Incompatibilité de type »
et le débogage me renvoie à :
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""y""")
Quel fouillis pour mes petites méninges ;-)
A+
Serge
"Modeste" a écrit dans le message de news:
Bonsour® garnoteBonsoir, Bonsoir,
Dans cette macro, je voudrais faire apparaître
dans mon MsgBox :
Le mercredi 18 février 2009 au lieu de 18/02/09
Le lundi 29 décembre 2042 au lieu de 29/12/2042
33 ans 11 mois 9 jours au lieu de 09/11/33
MsgBox "Date de départ :" & vbLf & Format(dd ,"dd mmmm yyyy") & vbLf _
& "Date de la chute :" & vbLf & Format(dc, "dd mmmm yyyy") & vbLf _
& "Temps requis :" & vbLf & (year(temps)-1900) & " ans " & month(temps)-1 &" mois " & day(temps) &" jour(s)"
!!!!!
Attention je doute du age=onze mois tiré d'un format de date ;o)))
i.e le 01/01/33 le temps est 1 jour et non 1 mois et 1 jours
voir à utiliser datedif
temps=age(dd,dc)
Function AGE(Date1 As Date, Date2 As Date) As String
Dim Elt As Long, D1 As Long, D2 As Long
D1 = Int(Date1): D2 = Int(Date2)
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""y""")
AGE = Elt & IIf(Elt > 1, " ans, ", " an,") & _
Evaluate("DATEDIF(" & D1 & "," & D2 & ",""ym""") & " mois, "
Elt = Evaluate("DATEDIF(" & D1 & "," & D2 & ",""md""")
AGE = AGE & Elt & IIf(Elt > 1, " jours", " jour")
End Function
Cette formule :
ÚTEDIF(A1;B1;"y") & " ans " & DATEDIF(A1;B1;"ym") & " mois " &
DATEDIF(A1;B1;"md") & " jour(s)"
me renvoie 33 ans 10 mois 11 jours.
Est-elle écrite correctement et peut-on s'y fier ?
Cette formule :
=DATEDIF(A1;B1;"y") & " ans " & DATEDIF(A1;B1;"ym") & " mois " &
DATEDIF(A1;B1;"md") & " jour(s)"
me renvoie 33 ans 10 mois 11 jours.
Est-elle écrite correctement et peut-on s'y fier ?
Cette formule :
ÚTEDIF(A1;B1;"y") & " ans " & DATEDIF(A1;B1;"ym") & " mois " &
DATEDIF(A1;B1;"md") & " jour(s)"
me renvoie 33 ans 10 mois 11 jours.
Est-elle écrite correctement et peut-on s'y fier ?
ou plutot :
MsgBox "Date de départ :" & vbLf & Format(dd, "dddd dd mmmm yyyy") &
vbLf _ & "Date de la chute :" & vbLf & Format(dc, "dddd dd
mmmm
yyyy") & vbLf _
& "Temps requis :" & vbLf & (Year(temps) - 1900) & " ans " &
Month(temps) - 1 & " mois " & Day(temps) & " jour(s)"
MsgBox "Date de départ :" & vbLf & Format(dd ,"dd mmmm yyyy") & vbLf
_ & "Date de la chute :" & vbLf & Format(dc, "dd mmmm
yyyy") & vbLf _ & "Temps requis :" & vbLf &
(year(temps)-1900) & " ans " & month(temps)-1 &" mois " & day(temps)
&" jour(s)"
ou plutot :
MsgBox "Date de départ :" & vbLf & Format(dd, "dddd dd mmmm yyyy") &
vbLf _ & "Date de la chute :" & vbLf & Format(dc, "dddd dd
mmmm
yyyy") & vbLf _
& "Temps requis :" & vbLf & (Year(temps) - 1900) & " ans " &
Month(temps) - 1 & " mois " & Day(temps) & " jour(s)"
MsgBox "Date de départ :" & vbLf & Format(dd ,"dd mmmm yyyy") & vbLf
_ & "Date de la chute :" & vbLf & Format(dc, "dd mmmm
yyyy") & vbLf _ & "Temps requis :" & vbLf &
(year(temps)-1900) & " ans " & month(temps)-1 &" mois " & day(temps)
&" jour(s)"
ou plutot :
MsgBox "Date de départ :" & vbLf & Format(dd, "dddd dd mmmm yyyy") &
vbLf _ & "Date de la chute :" & vbLf & Format(dc, "dddd dd
mmmm
yyyy") & vbLf _
& "Temps requis :" & vbLf & (Year(temps) - 1900) & " ans " &
Month(temps) - 1 & " mois " & Day(temps) & " jour(s)"
MsgBox "Date de départ :" & vbLf & Format(dd ,"dd mmmm yyyy") & vbLf
_ & "Date de la chute :" & vbLf & Format(dc, "dd mmmm
yyyy") & vbLf _ & "Temps requis :" & vbLf &
(year(temps)-1900) & " ans " & month(temps)-1 &" mois " & day(temps)
&" jour(s)"
Bonsour® isabelleou plutot :
MsgBox "Date de départ :" & vbLf & Format(dd, "dddd dd mmmm yyyy") &
vbLf _ & "Date de la chute :" & vbLf & Format(dc, "dddd dd
mmmm
yyyy") & vbLf _
& "Temps requis :" & vbLf & (Year(temps) - 1900) & " ans " &
Month(temps) - 1 & " mois " & Day(temps) & " jour(s)"
n'est-ce point exactement ce que je proposais initialement ??? ;o))))MsgBox "Date de départ :" & vbLf & Format(dd ,"dd mmmm yyyy") & vbLf
_ & "Date de la chute :" & vbLf & Format(dc, "dd mmmm
yyyy") & vbLf _ & "Temps requis :" & vbLf &
(year(temps)-1900) & " ans " & month(temps)-1 &" mois " & day(temps)
&" jour(s)"
;ox
Bonsour® isabelle
ou plutot :
MsgBox "Date de départ :" & vbLf & Format(dd, "dddd dd mmmm yyyy") &
vbLf _ & "Date de la chute :" & vbLf & Format(dc, "dddd dd
mmmm
yyyy") & vbLf _
& "Temps requis :" & vbLf & (Year(temps) - 1900) & " ans " &
Month(temps) - 1 & " mois " & Day(temps) & " jour(s)"
n'est-ce point exactement ce que je proposais initialement ??? ;o))))
MsgBox "Date de départ :" & vbLf & Format(dd ,"dd mmmm yyyy") & vbLf
_ & "Date de la chute :" & vbLf & Format(dc, "dd mmmm
yyyy") & vbLf _ & "Temps requis :" & vbLf &
(year(temps)-1900) & " ans " & month(temps)-1 &" mois " & day(temps)
&" jour(s)"
;ox
Bonsour® isabelleou plutot :
MsgBox "Date de départ :" & vbLf & Format(dd, "dddd dd mmmm yyyy") &
vbLf _ & "Date de la chute :" & vbLf & Format(dc, "dddd dd
mmmm
yyyy") & vbLf _
& "Temps requis :" & vbLf & (Year(temps) - 1900) & " ans " &
Month(temps) - 1 & " mois " & Day(temps) & " jour(s)"
n'est-ce point exactement ce que je proposais initialement ??? ;o))))MsgBox "Date de départ :" & vbLf & Format(dd ,"dd mmmm yyyy") & vbLf
_ & "Date de la chute :" & vbLf & Format(dc, "dd mmmm
yyyy") & vbLf _ & "Temps requis :" & vbLf &
(year(temps)-1900) & " ans " & month(temps)-1 &" mois " & day(temps)
&" jour(s)"
;ox
la différence est là
Format(dc, "dddd dd mmmm yyyy")
Format(dc, "dd mmmm yyyy")
y'a trop de "d" dans stistoire là ;-)
isabelle
Modeste a écrit :Bonsour® isabelleou plutot :
MsgBox "Date de départ :" & vbLf & Format(dd, "dddd dd mmmm yyyy") &
vbLf _ & "Date de la chute :" & vbLf & Format(dc, "dddd dd
mmmm yyyy") & vbLf _
& "Temps requis :" & vbLf & (Year(temps) - 1900) & " ans " &
Month(temps) - 1 & " mois " & Day(temps) & " jour(s)"
n'est-ce point exactement ce que je proposais initialement ??? ;o))))MsgBox "Date de départ :" & vbLf & Format(dd ,"dd mmmm yyyy") & vbLf
_ & "Date de la chute :" & vbLf & Format(dc, "dd mmmm
yyyy") & vbLf _ & "Temps requis :" & vbLf &
(year(temps)-1900) & " ans " & month(temps)-1 &" mois " & day(temps)
&" jour(s)"
;ox
la différence est là
Format(dc, "dddd dd mmmm yyyy")
Format(dc, "dd mmmm yyyy")
y'a trop de "d" dans stistoire là ;-)
isabelle
Modeste a écrit :
Bonsour® isabelle
ou plutot :
MsgBox "Date de départ :" & vbLf & Format(dd, "dddd dd mmmm yyyy") &
vbLf _ & "Date de la chute :" & vbLf & Format(dc, "dddd dd
mmmm yyyy") & vbLf _
& "Temps requis :" & vbLf & (Year(temps) - 1900) & " ans " &
Month(temps) - 1 & " mois " & Day(temps) & " jour(s)"
n'est-ce point exactement ce que je proposais initialement ??? ;o))))
MsgBox "Date de départ :" & vbLf & Format(dd ,"dd mmmm yyyy") & vbLf
_ & "Date de la chute :" & vbLf & Format(dc, "dd mmmm
yyyy") & vbLf _ & "Temps requis :" & vbLf &
(year(temps)-1900) & " ans " & month(temps)-1 &" mois " & day(temps)
&" jour(s)"
;ox
la différence est là
Format(dc, "dddd dd mmmm yyyy")
Format(dc, "dd mmmm yyyy")
y'a trop de "d" dans stistoire là ;-)
isabelle
Modeste a écrit :Bonsour® isabelleou plutot :
MsgBox "Date de départ :" & vbLf & Format(dd, "dddd dd mmmm yyyy") &
vbLf _ & "Date de la chute :" & vbLf & Format(dc, "dddd dd
mmmm yyyy") & vbLf _
& "Temps requis :" & vbLf & (Year(temps) - 1900) & " ans " &
Month(temps) - 1 & " mois " & Day(temps) & " jour(s)"
n'est-ce point exactement ce que je proposais initialement ??? ;o))))MsgBox "Date de départ :" & vbLf & Format(dd ,"dd mmmm yyyy") & vbLf
_ & "Date de la chute :" & vbLf & Format(dc, "dd mmmm
yyyy") & vbLf _ & "Temps requis :" & vbLf &
(year(temps)-1900) & " ans " & month(temps)-1 &" mois " & day(temps)
&" jour(s)"
;ox
je pense honnetement que cela est correct !!!
Cette formule :
ÚTEDIF(A1;B1;"y") & " ans " & DATEDIF(A1;B1;"ym") & " mois " &
DATEDIF(A1;B1;"md") & " jour(s)"
me renvoie 33 ans 10 mois 11 jours.
Est-elle écrite correctement et peut-on s'y fier ?
je pense honnetement que cela est correct !!!
Cette formule :
ÚTEDIF(A1;B1;"y") & " ans " & DATEDIF(A1;B1;"ym") & " mois " &
DATEDIF(A1;B1;"md") & " jour(s)"
me renvoie 33 ans 10 mois 11 jours.
Est-elle écrite correctement et peut-on s'y fier ?
je pense honnetement que cela est correct !!!
Cette formule :
ÚTEDIF(A1;B1;"y") & " ans " & DATEDIF(A1;B1;"ym") & " mois " &
DATEDIF(A1;B1;"md") & " jour(s)"
me renvoie 33 ans 10 mois 11 jours.
Est-elle écrite correctement et peut-on s'y fier ?
Bonsoir,
Mais non Isabelle, y avait pas trop d'caractères
;o)))
Bonsoir,
Mais non Isabelle, y avait pas trop d'caractères
;o)))
Bonsoir,
Mais non Isabelle, y avait pas trop d'caractères
;o)))