[Aptère]

Sub Comparer()

For ligne = 1 To 4

For colonne = 1 To 3

If Sheets("Feuil1").Cells(ligne, colonne) <> Sheets("Feuil2").Cells(ligne, colonne) Then Sheets("Feuil3").Cells(ligne, colonne) = "Erreur"

Next colonne

Next ligne

End Sub

[Ellys]

[Aptère]

Trouver l’âge d’une personne née à la date A1 à la date de référence A2 :

1. Faire le calcul à la main :

Comparer le jour de référence/mois de référence avec le jour de naissance/ le mois de naissance.

Si celui-ci est égal ou après, l’âge est l’année de référence – l’année de naissance.

Si celui-ci est avant, l’âge est égal à l’année de référence – l’année de naissance -1

Ex. 1 :
En A1, la date de naissance de la personne : 13/07/1955
En A2, la date de référence : 14/08/1966
Le 14/08 est après le 13/07, donc l’âge = 1966 - 1955 = 11 années

Ex. 2 :
En A1, la date de naissance de la personne : 13/07/1955
En A2, la date de référence : 13/07/1966
Le 13/07 est égal au 13/07, donc l’âge = 1966 - 1955 = 11 années

Ex. 3 :
En A1, la date de naissance de la personne : 13/07/1955
En A2, la date de référence : 10/05/1966
Le 10/05 est inférieur au 13/07, donc l’âge = 1966 – 1955 - 1 = 10 années

2. Ecrire la formule de calcul de l’âge :

= SI(test_logique; [valeur_si_vrai]; [valeur_si_faux])

Avec

Test_lgique est DATE(ANNEE(A2);MOIS(A2);JOUR(A2))>= DATE(ANNEE(A2);MOIS(A1);JOUR(A1))

[valeur_si_vrai] est ANNEE(A2)-ANNEE(A1)

[valeur_si_faux] est ANNEE(A2)-ANNEE(A1)-1

Ce qui donne comme formule :

=SI(DATE(ANNEE(A2);MOIS(A2);JOUR(A2))>=DATE(ANNEE(A2);MOIS(A1);JOUR(A1));ANNEE(A2)-ANNEE(A1);ANNEE(A2)-ANNEE(A1)-1)

[Aptère]

... Et en couleur :

=SI(DATE(ANNEE(A2);MOIS(A2);JOUR(A2))>=DATE(ANNEE(A2);MOIS(A1);JOUR(A1));ANNEE(A2)-ANNEE(A1);ANNEE(A2)-ANNEE(A1)-1)

[Aptère]

Ce que je retiens après quelques échanges :

Si on veut moins tâtonner, moins bricoler, il est nécessaire d’utiliser un peu de méthode.

1. Bien définir le problème :

Trouver l’âge d’une personne, née à la date en cellule I2, à la date de référence contenue dans la cellule A2.

2. Faire le calcul à la main :

Comparer le jour de référence/mois de référence avec le jour de naissance/ le mois de naissance.

Si celui-ci est égal ou après, l’âge est l’année de référence – l’année de naissance.

Si celui-ci est avant, l’âge est égal à l’année de référence – l’année de naissance -1

Ex. 1 :
En I2, la date de naissance de la personne : 13/07/1955
En A2, la date de référence : 14/08/1966
Le 14/08 est après le 13/07, donc l’âge = 1966 - 1955 = 11 années

Ex. 2 :
En I2, la date de naissance de la personne : 13/07/1955
En A2, la date de référence : 13/07/1966
Le 13/07 est égal au 13/07, donc l’âge = 1966 - 1955 = 11 années

Ex. 3 :
En I2, la date de naissance de la personne : 13/07/1955
En A2, la date de référence : 10/05/1966
Le 10/05 est inférieur au 13/07, donc l’âge = 1966 – 1955 - 1 = 10 années

3. Ecrire la formule de calcul de l’âge :

= SI(test_logique; [valeur_si_vrai]; [valeur_si_faux])

Avec
Test_logique est DATE(ANNEE(A2);MOIS(A2);JOUR(A2))>=DATE(ANNEE(A2);MOIS(I2);JOUR(I2))

[valeur_si_vrai] est ANNEE(A2)-ANNEE(I2)

[valeur_si_faux] est ANNEE(A2)-ANNEE(I2)-1

Ce qui donne comme formule :

=SI(DATE(ANNEE(A2);MOIS(A2);JOUR(A2))>=DATE(ANNEE(A2);MOIS(I2);JOUR(I2));ANNEE(A2)-ANNEE(I2);ANNEE(A2)-ANNEE(I2)-1)

Utiliser le copier-coller pour éviter les erreurs de syntaxe en copiant la formule ci-dessus, et en la collant dans la feuille Excel. Essayer de l'écrire par la suite par vous même.