calcul années

11 réponses

pierre

14/02/2004 à 19:30

bonsoir,
comment ajouter x années à 2004 par ex ?
car pour le moment si j'ajoute 60 (ans) à la valeur d'une cellule donnée par
la fonction année(2004) j'obtiens
25 aout 1905 ??? :-( bizarre
mreci de vos réponses

begin 666 pierre.vcf
M0D5'24XZ5D-!4D0-"E9%4E-)3TXZ,BXQ#0I..CMP:65R<F4-"D9..G!I97)R
M90T*14U!24P[4%)%1CM)3E1%4DY%5#HB>'!I97)R934R>") =&ES8V%L:2YF
D<@T*4D56.C(P,#0P,C$T5#$X,S T.5H-"D5.1#I60T%21 T*
`
end

10 réponses

1 2

michdenis

14/02/2004 à 19:47

Bonjour Pierre,

IL y a ceci :

ÚTE(ANNEE(AUJOURDHUI())+60;MOIS(AUJOURDHUI());JOUR(AUJOURDHUI()))

Salutations!

"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de news:
bonsoir,
comment ajouter x années à 2004 par ex ?
car pour le moment si j'ajoute 60 (ans) à la valeur d'une cellule donnée par
la fonction année(2004) j'obtiens
25 aout 1905 ??? :-( bizarre
mreci de vos réponses

isabelle

14/02/2004 à 19:47

bonjour pierre,

il faut additioner le nombre de jours représentant 60 ans.

¡+(60*365)+(60/4)

ou bien une fonction perso,

Function PlusAnnée(LaDate As Range) As Date
PlusAnnée = LaDate + (60 * 365) + (60 / 4)
End Function

isabelle

bonsoir,
comment ajouter x années à 2004 par ex ?
car pour le moment si j'ajoute 60 (ans) à la valeur d'une cellule donnée par
la fonction année(2004) j'obtiens
25 aout 1905 ??? :-( bizarre
mreci de vos réponses

isabelle

14/02/2004 à 19:51

correction :

Function PlusAnnée(LaDate As Range, quantité As Integer) As Date
PlusAnnée = LaDate + (quantité * 365) + (quantité / 4)
End Function

isabelle

bonjour pierre,

il faut additioner le nombre de jours représentant 60 ans.

¡+(60*365)+(60/4)

ou bien une fonction perso,

Function PlusAnnée(LaDate As Range) As Date
PlusAnnée = LaDate + (60 * 365) + (60 / 4)
End Function

isabelle

bonsoir,
comment ajouter x années à 2004 par ex ?
car pour le moment si j'ajoute 60 (ans) à la valeur d'une cellule donnée par
la fonction année(2004) j'obtiens
25 aout 1905 ??? :-( bizarre
mreci de vos réponses

pierre

14/02/2004 à 20:12

rebonsoir
"isabelle" a écrit dans le message news:

correction :

Function PlusAnnée(LaDate As Range, quantité As Integer) As Date
PlusAnnée = LaDate + (quantité * 365) + (quantité / 4) ' je crois
comprendre que tu prends en compte les années bisextiles

End Function

isabelle

merci beaucoup

pierre

bonjour pierre,

il faut additioner le nombre de jours représentant 60 ans.

¡+(60*365)+(60/4)

ou bien une fonction perso,

Function PlusAnnée(LaDate As Range) As Date
PlusAnnée = LaDate + (60 * 365) + (60 / 4)
End Function

isabelle

bonsoir,
comment ajouter x années à 2004 par ex ?
car pour le moment si j'ajoute 60 (ans) à la valeur d'une cellule
donnée par

la fonction année(2004) j'obtiens
25 aout 1905 ??? :-( bizarre
mreci de vos réponses

RaMa

14/02/2004 à 20:25

Bonsoir

=MOIS.DECALER(DATEVAL("01/01/"&A1);720)
720 c'est 12x60
--
RaMa
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de
news:

bonsoir,
comment ajouter x années à 2004 par ex ?
car pour le moment si j'ajoute 60 (ans) à la valeur d'une cellule donnée
par

la fonction année(2004) j'obtiens
25 aout 1905 ??? :-( bizarre
mreci de vos réponses

isabelle

14/02/2004 à 20:31

' je crois comprendre que tu prends en compte les années bisextiles

c'est bien ça,

isabelle

isabelle

14/02/2004 à 20:50

j'oubliais de prévoir à enlever les décimals,

Function PlusAnnée(LaDate As Range, quantité As Integer) As Date
PlusAnnée = LaDate + (quantité * 365) + Int((quantité / 4) + 1)
End Function

¡+(5*365)+ENT(5/4)+1

isabelle

' je crois comprendre que tu prends en compte les années bisextiles

c'est bien ça,

isabelle

gee-dee-

14/02/2004 à 22:31

Bonsoir,
Sauf horreur de ma part la fonction année s'applique à une date ou bien à un
nombre correspondant à une date .....

année(2004) = année du 2004eme jour apres 01/01/1900 !!!!!!

donc pour ajouter 60ans à 2004
;-))))
2004+60 non ?????

histoire de compliquer les choses
2004 en A1
60 en B1
resultat en C1 =annee(date(A1+B1;1;1)

@+
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de
news:

bonsoir,
comment ajouter x années à 2004 par ex ?
car pour le moment si j'ajoute 60 (ans) à la valeur d'une cellule donnée
par

la fonction année(2004) j'obtiens
25 aout 1905 ??? :-( bizarre
mreci de vos réponses

Michel Pierron

14/02/2004 à 23:40

C'est normal Pierre si tu cherches à calculer l'âge du capitaine JPS.
:-))) MP

"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de
news:

bonsoir,
comment ajouter x années à 2004 par ex ?
car pour le moment si j'ajoute 60 (ans) à la valeur d'une cellule donnée
par

la fonction année(2004) j'obtiens
25 aout 1905 ??? :-( bizarre
mreci de vos réponses

ChrisV

15/02/2004 à 09:51

donc pour ajouter 60ans à 2004
;-))))
2004+60 non ?????

Tout à fait d'accord avec toi Geedee !

histoire de compliquer les choses
;-)

ou encore... au Format: aaa

=--("1/1/"&A1+B1)

ChrisV

"gee-dee-" a écrit dans le message de news:

Bonsoir,
Sauf horreur de ma part la fonction année s'applique à une date ou bien à
un

nombre correspondant à une date .....

année(2004) = année du 2004eme jour apres 01/01/1900 !!!!!!

donc pour ajouter 60ans à 2004
;-))))
2004+60 non ?????

histoire de compliquer les choses
2004 en A1
60 en B1
resultat en C1 =annee(date(A1+B1;1;1)

@+
"pierre" <"xpierre52x"@tiscali.fr> a écrit dans le message de
news:
bonsoir,
comment ajouter x années à 2004 par ex ?
car pour le moment si j'ajoute 60 (ans) à la valeur d'une cellule donnée
par

la fonction année(2004) j'obtiens
25 aout 1905 ??? :-( bizarre
mreci de vos réponses

1 2

calcul années

10 réponses

Veuillez sélectionner un problème