Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.
  • Initiateur de la discussion Initiateur de la discussion ILOVEUBB
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

I

ILOVEUBB

Guest
salut ;

j'ai les date de naissance de tous les employer dans la colonne "C8:C" est je veut calculer l'age pour qu'il me donne les personnes qui sont prêt pour la retraite et qui sont prêt de la retraite .

j'ai utiliser :
Me.Label54 = Date - f.Cells(ligne, 8)
If DateValue(D1) > DateValue(D2) Or Not IsDate(D2) Then Exit Function
mais sa donnent rien . je veux qu'il affiche le résultat dans un Me.Label54
je vous expliquent mon problème : pour les = + 60 on attribue un "A" dans Me.Label54 et pour ceux qui sont entre 50 et 60 on attribue un "B" dans Me.Label54 ceux qui sont moins de 50 un "C" .
svp quelque piste ...
merci
 
Re : calcule age

Bonjour ILOVEUBB, le forum,

Mais j'ai eu dû mal à trouver les personne concerner sur le tableau

Fichier (4) avec :

Code:
If i >= 0 Then
  '---cadrage du tableau---
  Application.Goto P(i + 2, 1), True
peut tu me donner des pistes pour attribuer un A ou B ou C automatisé dans le tableau

Mes formules en colonne F font ça très bien il me semble 😕

A+
 

Pièces jointes

Re : calcule age

Re,

Si vous voulez des textes plus élaborés pour les catégories A B C, utilisez en F6 :

Code:
=RECHERCHE(E6;{0."C - non concerné";50."B - à étudier";60."A - admissible"})
Edit : ajustez la largeur du Label4 dans l'USF et dans UserForm_Initialize ajoutez un astérisque :

Code:
Label8 = Application.CountIf(P.Columns(5), "A*")
Label10 = Application.CountIf(P.Columns(5), "B*")
Label12 = Application.CountIf(P.Columns(5), "C*")
A+
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…