Comparaison de dates: souci avec le jour (VBA)

[YANN-56]

Bonsoir à ceux qui passeront par là, ou Bonjour suivant l'heure.

Dans mon appli en cours, je souhaite que l'utilisateur visualise l'age des abonnés à son Club d'après la date de naissance enregistrée par ailleurs sur une feuille (Mais pas ici pour le test)

Elle est celle entrée dans le "TexBox1" et le résultat n'est pas trop mal quand on lance
la procédure par le bouton "Voir mon Age".

Si je fais appel à vous, c'est que le comptage des jours n'est pas précis.
(-1, +1, j'ai tout essayé !!!) Pourtant, j'aimerais bien…

D'autant que j'avais aussi un arrière pensé de créer une Alerte
pour ne pas oublier de souhaiter un bon anniversaire à l'abonné.

J'ai fouiné du coté des fils traitant du calcul entre deux dates….
Bonjour les imbuvables variables ""chrq:ljbhf" et functions "X ou Y, avec des Z incompréhensibles pour mon petit niveau (Une page A4 en tout petit à lire, et rien piger !!!)"
Elles te file des boutons à force de ne pas savoir dans lequel mettre l'évènement.

Mon truc ci-joint est simple: 13 lignes…

Si vous avez une idée pour parfaire ma bidouille, je suis preneur.

Merci d'avance à vous qui pourriez m'aider, et à ceux qui m'ont déjà tant appris.

Bonne fin de journée, et bonne fin de fin de semaine à tous.

Yann

 

[YANN-56]

Re : Comparaison de dates: souci avec le jour (VBA)

Bonsoir à ceux qui passeront par là.

Bonsoir ROGER

Voici dont l'intégration de ton code dans mon dernier classeur d'essai joint.
La colonne "Age" est parfaite………Beau travail de ta part !!!

J'ai situé la limite de ma date d'alerte à 7 jours.
Mais il me reste le souci, comme aujourd'hui,i de ne pas oublier ceux qui sont nés un 02 mars.
Pour cela je dois savoir combien de jours il y a dans le présent mois.

J'ai pensé à faire une simulation en ajoutant + 1, 2 3 et c. au présent jour
et par une boucle du genre "Loop Until" tant que cette date fictive est "VRAI",
connaître le nombre de jours qu'il reste avant la fin du présent mois.

"Do While, Until et autres" je n'ai jamais encore exploré
Cela va me donner encore l'occasion d'apprendre.

Outre ton aide, tu m'as donné l'envie d'avancer. C'est bien dans l'esprit de ce site.
Tu as gagné sur les deux tableaux!

Merci encore, et plein de bonnes choses à toi.

Yann

P.S.
Si la date de ta Feuille "Tests" est ta date de naissance,
je ne suis que de 1 an, (x) mois, (y) jours ton cadet.
L'on peut se tutoyer. Non? N'est-il pas?