bonjour à tous
en A2 une date d'arrivée par exemple 06/07/2007
en B2 une date de fin par exemple le 07/07/2007
en C2 la formule suivante
DATEDIF(A2;B2;"y")&" ans "&DATEDIF(A2;B2;"ym")&" mois
"&DATEDIF(A2;B2;"md")&" jours "
j'obtiens 1 jour alors qu'il y a 2 jours dans cet exemple.
peut-on améliorer cette formule ou la simplifier.
Merci
--
Ctitout
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Pascal
Bonjour, Dans un module, essaye ceci Function DifferenceDate(date1 As Date, date2 As Date) 'mpfe Manuel Diaz With Application.WorksheetFunction DifferenceDate = _ .RoundDown((((((date2 - date1) Mod (365.25)) / 365.25) * 12 - _ .RoundDown((((date2 - date1) Mod (365.25)) / 365.25) * 12, 0)) / 12) * _ 365.25, 0) & " jour(s) " & _ .RoundDown((((date2 - date1) Mod (365.25)) / 365.25) * 12, 0) & " mois " & _ .RoundDown((date2 - date1) / 365.25, 0) & " année(s) " End With End Function Sinon dans une belle collection de Frédéric Sigonneau j'ai trouvé cela mais pas testé =ENT((B2-A2)/365,25)&SI(ENT((B2-A2)/365,25)<2;" an ";" ans ")&ENT(MOD(((B2-A2)/365,25);1)*12)&" mois "&ENT((MOD(((B2-A2)/365,25);1)*12-ENT(MOD(((B2-A2)/365,25);1)*12))*365,25/12)&SI(ENT((MOD(((B2-A2)/365,25);1)*12-ENT(MOD(((B2-A2)/365,25);1)*12))*365,25/12)<2;" jour";" jours")
Bonne Journée
"Ctitout" a écrit dans le message de news:
bonjour à tous en A2 une date d'arrivée par exemple 06/07/2007 en B2 une date de fin par exemple le 07/07/2007 en C2 la formule suivante DATEDIF(A2;B2;"y")&" ans "&DATEDIF(A2;B2;"ym")&" mois "&DATEDIF(A2;B2;"md")&" jours "
j'obtiens 1 jour alors qu'il y a 2 jours dans cet exemple. peut-on améliorer cette formule ou la simplifier. Merci -- Ctitout
--- Antivirus avast! : message Entrant sain. Base de donnees virale (VPS) : 000754-4, 06/07/2007 Analyse le : 07/07/2007 09:22:14 avast! - copyright (c) 1988-2007 ALWIL Software. http://www.avast.com
--- Antivirus avast! : message Sortant sain. Base de donnees virale (VPS) : 000754-4, 06/07/2007 Analyse le : 07/07/2007 09:27:44 avast! - copyright (c) 1988-2007 ALWIL Software. http://www.avast.com
Bonjour,
Dans un module, essaye ceci
Function DifferenceDate(date1 As Date, date2 As Date)
'mpfe Manuel Diaz
With Application.WorksheetFunction
DifferenceDate = _
.RoundDown((((((date2 - date1) Mod (365.25)) / 365.25) * 12 - _
.RoundDown((((date2 - date1) Mod (365.25)) / 365.25) * 12, 0)) / 12)
* _
365.25, 0) & " jour(s) " & _
.RoundDown((((date2 - date1) Mod (365.25)) / 365.25) * 12, 0) & "
mois " & _
.RoundDown((date2 - date1) / 365.25, 0) & " année(s) "
End With
End Function
Sinon dans une belle collection de Frédéric Sigonneau j'ai trouvé cela mais
pas testé
=ENT((B2-A2)/365,25)&SI(ENT((B2-A2)/365,25)<2;" an ";" ans
")&ENT(MOD(((B2-A2)/365,25);1)*12)&" mois
"&ENT((MOD(((B2-A2)/365,25);1)*12-ENT(MOD(((B2-A2)/365,25);1)*12))*365,25/12)&SI(ENT((MOD(((B2-A2)/365,25);1)*12-ENT(MOD(((B2-A2)/365,25);1)*12))*365,25/12)<2;"
jour";" jours")
Bonne Journée
"Ctitout" <nonmerci@rofl.no.spam> a écrit dans le message de news:
E12B5DCC-5D54-4E37-B177-59CC0681CB45@microsoft.com...
bonjour à tous
en A2 une date d'arrivée par exemple 06/07/2007
en B2 une date de fin par exemple le 07/07/2007
en C2 la formule suivante
DATEDIF(A2;B2;"y")&" ans "&DATEDIF(A2;B2;"ym")&" mois
"&DATEDIF(A2;B2;"md")&" jours "
j'obtiens 1 jour alors qu'il y a 2 jours dans cet exemple.
peut-on améliorer cette formule ou la simplifier.
Merci
--
Ctitout
---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000754-4, 06/07/2007
Analyse le : 07/07/2007 09:22:14
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com
---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000754-4, 06/07/2007
Analyse le : 07/07/2007 09:27:44
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com
Bonjour, Dans un module, essaye ceci Function DifferenceDate(date1 As Date, date2 As Date) 'mpfe Manuel Diaz With Application.WorksheetFunction DifferenceDate = _ .RoundDown((((((date2 - date1) Mod (365.25)) / 365.25) * 12 - _ .RoundDown((((date2 - date1) Mod (365.25)) / 365.25) * 12, 0)) / 12) * _ 365.25, 0) & " jour(s) " & _ .RoundDown((((date2 - date1) Mod (365.25)) / 365.25) * 12, 0) & " mois " & _ .RoundDown((date2 - date1) / 365.25, 0) & " année(s) " End With End Function Sinon dans une belle collection de Frédéric Sigonneau j'ai trouvé cela mais pas testé =ENT((B2-A2)/365,25)&SI(ENT((B2-A2)/365,25)<2;" an ";" ans ")&ENT(MOD(((B2-A2)/365,25);1)*12)&" mois "&ENT((MOD(((B2-A2)/365,25);1)*12-ENT(MOD(((B2-A2)/365,25);1)*12))*365,25/12)&SI(ENT((MOD(((B2-A2)/365,25);1)*12-ENT(MOD(((B2-A2)/365,25);1)*12))*365,25/12)<2;" jour";" jours")
Bonne Journée
"Ctitout" a écrit dans le message de news:
bonjour à tous en A2 une date d'arrivée par exemple 06/07/2007 en B2 une date de fin par exemple le 07/07/2007 en C2 la formule suivante DATEDIF(A2;B2;"y")&" ans "&DATEDIF(A2;B2;"ym")&" mois "&DATEDIF(A2;B2;"md")&" jours "
j'obtiens 1 jour alors qu'il y a 2 jours dans cet exemple. peut-on améliorer cette formule ou la simplifier. Merci -- Ctitout
--- Antivirus avast! : message Entrant sain. Base de donnees virale (VPS) : 000754-4, 06/07/2007 Analyse le : 07/07/2007 09:22:14 avast! - copyright (c) 1988-2007 ALWIL Software. http://www.avast.com
--- Antivirus avast! : message Sortant sain. Base de donnees virale (VPS) : 000754-4, 06/07/2007 Analyse le : 07/07/2007 09:27:44 avast! - copyright (c) 1988-2007 ALWIL Software. http://www.avast.com
Azo3
c'est simplement le pb des intervalles! ajoute 1 à la fin de ta formule!
-- Serge CENCI MVP Microsoft WINDOWS https://mvp.support.microsoft.com/profile/Serge.Cenci
NB - adresse : enlever ENLEVER "Ctitout" a écrit dans le message de news:
bonjour à tous en A2 une date d'arrivée par exemple 06/07/2007 en B2 une date de fin par exemple le 07/07/2007 en C2 la formule suivante DATEDIF(A2;B2;"y")&" ans "&DATEDIF(A2;B2;"ym")&" mois "&DATEDIF(A2;B2;"md")&" jours "
j'obtiens 1 jour alors qu'il y a 2 jours dans cet exemple. peut-on améliorer cette formule ou la simplifier. Merci -- Ctitout
c'est simplement le pb des intervalles! ajoute 1 à la fin de ta formule!
--
Serge CENCI
MVP Microsoft WINDOWS
https://mvp.support.microsoft.com/profile/Serge.Cenci
sergiofranceENLEVER@wanadoo.fr
NB - adresse : enlever ENLEVER
"Ctitout" <nonmerci@rofl.no.spam> a écrit dans le message de news:
E12B5DCC-5D54-4E37-B177-59CC0681CB45@microsoft.com...
bonjour à tous
en A2 une date d'arrivée par exemple 06/07/2007
en B2 une date de fin par exemple le 07/07/2007
en C2 la formule suivante
DATEDIF(A2;B2;"y")&" ans "&DATEDIF(A2;B2;"ym")&" mois
"&DATEDIF(A2;B2;"md")&" jours "
j'obtiens 1 jour alors qu'il y a 2 jours dans cet exemple.
peut-on améliorer cette formule ou la simplifier.
Merci
--
Ctitout
c'est simplement le pb des intervalles! ajoute 1 à la fin de ta formule!
-- Serge CENCI MVP Microsoft WINDOWS https://mvp.support.microsoft.com/profile/Serge.Cenci
NB - adresse : enlever ENLEVER "Ctitout" a écrit dans le message de news:
bonjour à tous en A2 une date d'arrivée par exemple 06/07/2007 en B2 une date de fin par exemple le 07/07/2007 en C2 la formule suivante DATEDIF(A2;B2;"y")&" ans "&DATEDIF(A2;B2;"ym")&" mois "&DATEDIF(A2;B2;"md")&" jours "
j'obtiens 1 jour alors qu'il y a 2 jours dans cet exemple. peut-on améliorer cette formule ou la simplifier. Merci -- Ctitout