bonjour
 
j'ai une base de données où dans ma colonne AT figurent des dates sous format jj/mm/annee
 
je voudrais créer une macro qui permette d'insérer une colonne à coté, de l'appeler "tranches d'âge"
 
et de passer en revue chaque cellule de ma colonne AT2, AT3, AT4 jusqu'à la fin de mon tableau et inscrire dans la colonne juxtaposée le commentaire ;
à savoir, si la date renseignée est "15/06/1987" écrire à côté "10 à 20 ans"
 
il faudrait aussi que la macro se base par rapport à l'année en cours, genre, mes variables auraient l'air de ça
 
Dim age1, age2, age3, age4, age5, age6
age1 = "01/01/& Year(Date) - 5"
age2 = "01/01/& Year(Date) - 10"
age3 = "01/01/& Year(Date) - 20"
age4 = "01/01/& Year(Date) - 30"
age5 = "01/01/& Year(Date) - 40"
age6 = "01/01/& Year(Date) - 50"
 
qq'un peut m'aider siouplait ?

c impossible ?

si..si !

bonjour,  
C'est possible... mais faudra attendre encore  un petit peu, car je part au boulot !
A+

lol galopin ok.
j'ai beau essayer j'arrive pas !

Salut peanutz,
Voilà une petite sollution pour toi Cette macro t'écris les tranches d'ages dans la colone 47 en fonction d'une date en collone 46 :

Je me suis basée sur les années mais tu eux le faire de date à date
en remplaçant :   YEAR(TODAY())-YEAR(RC[-1])
par :                 (TODAY()-RC[-1])/365.25
bon courage

wow trop compliqué, ça ira bien  
 
merci encore

Atennds si c'est trop compliqué ça va pas !
Le but est aussi que tu comprennes pas seulment que tu aie la bonne formule !
 
Qu'est-qui te pose question ?

disons que je n'ai plus assez de temps pour peaufiner !
j'ai même pas réussi à changer les tranches d'âge ! genre
01 à 05
05 à 10
10 à 20
20 à 30
30 à 40
40 à 50
+ de 50
 
mais franchement ça va c'est nickel comme ça
 
merci pour tout

Surement mais le mieux serait que tu mettent tes tranches d'age à toi :

ceci est, dans le language anglais, la formule qui se met dans ta case
 
YEAR(TODAY()) : ceci te donne l'année à la date d'aujourd'hui et s'affiche dans la cellule : ANNEE(AUJOURDHUI())
RC[-1] : cà c'est l'addresse de la cellule : R pour ligne rien entre crochet indique que c'est sur la même ligne, C pour la colone avec [-1] pour dire que c'est la cellule juste à gauche s'affiche AT1 par exemple.
YEAR(TODAY())-YEAR(RC[-1]) : ceci te donne donc le nombre d'années
après tu as la mise en place des conditions : If(test,si oui, si non)
le test en premier c'est YEAR(TODAY())-YEAR(RC[-1])<10 tous les tests sont construits ainsi, il n'y a que ces valeurs en gras à changer et le contenu du message de sortie : ""moins de 10 ans"".
Ensuite ce n'est qu'un jeu sur le nombre de parenthèses et sur les if, placer tes conditions dans l'ordre.
 
Essayes quand même...

bonsoir,
comme promis je t'apporte ma contribution :
Ces 2 macros doivent être copiées dans un module standart (Module1...) pas dans un module de feuille.

Ensuite tu n'a plus qu'a lancer la macro Test depuis ta feuille.
Nota : la macro s'arrête à la ligne 100 mais tu peux mettre un zéro de plus sans problème.
Je pense que le code se passe de commentaire.
 
Nota : il est possible d'utiliser la fonction TRANCHE comme une fonction d'Excel en mettant dans la cellule AU1 par exemple :
=TRANCHE(AT1)
et en faisant une recopie incrémentée. Ainsi ta feuille est toujours à jour.
A+