Microsoft 365 Image gâteau d'anniversaire

[Piksaw]

Bonjour a tous

Alors voilà j'ai une feuille planning journalier avec une liste de prénom et j'aimerai que quand c'est le jour de leurs anniversaire un petit gâteau se mette sur la case a côté du prénom concerné

et si leur anniversaire tombe un samedi ou un dimanche il faudrait que le gâteau se mette pour le prochain jours ouvrable donc lundi dans mon cas

j'ai fait une feuille variable ou il y a la liste des prénom avec des dates d'anniversaire mais il faudrait faire le lien avec l'image

merci à ceux qui pourront m'aider

 

[laurent3372]

Bonsoir,
Il n'y a pas de date de naissance dans ton fichier exemple.

 

[Piksaw]

Bonsoir,
Il n'y a pas de date de naissance dans ton fichier exemple.

dans la feuille variable j'ai fait une liste fictif prénom et date anniversaire

 

[laurent3372]

J'ai codé les formules qui permettent de dire s'il faut afficher le gâteau ou pas.
Pour afficher le gâteau, il faudrait une macro en VBA. Je ferai ça plus tard.
En PJ, le fichier avec VRAI ou FAUX dans la colonne B de la feuille Journalier.
J'ai remplacé le =AUJOURDHUI() de la case $C$1 par une date saisie manuellement, pour pouvoir effectuer des tests.
J'ai défini les noms suivants:

Nom	Fait référence à
Anniversaire	=DATE(AnCourant;MOIS(Journalier!DateNaissance);JOUR(Journalier!DateNaissance))
Anniv_est_Férié	=NON(ESTNA(EQUIV(Anniversaire;Feriés;0)))
Anniv_hors-F érié	=SI(Anniv_est_Férié;Anniversaire+1;Anniversaire)
Anniv_hors_WE	=SI(JOURSEM(Anniv_hors_Férié;11)>5;Anniv_hors_Férié+(8-JOURSEM(Anniv_hors_Férié;11));Anniv_hors_Férié)

 

[mapomme]

Bonjour @Piksaw, @laurent3372,

Voyez le fichier joint qui n'utilise qu'une formule dans les cellules de la colonne B et utilise un caractère en police "Webdings" pour afficher un verre (et non une image qui complique tout).

Formule en B3 à copier et coller sur les autres cellules concernées de la colonne B
=SI(SOMMEPROD((A3=Variables!$J$5:$J$16)*(TEXTE($C$1;"jjmm")=TEXTE(Variables!$K$5:$K$16;"jjmm")))>0;"å";"")

Les cellules concernées de la colonne B sont en police "Webdings".

 

[laurent3372]

@mapomme: Bonsoir,
tu ne testes pas les WE ni les jours fériés.

 

[mapomme]

tu ne testes pas les WE ni les jours fériés.

J'avais sauté cette demande . Une formule plus complexe devrait faire l'affaire. Je m'y remets mais demain seulement...
ça va être difficile à tester ; il faudra attendre ce week-end ?

Bonne-nuit !

 

[laurent3372]

J'ai fait la synthèse de nos deux solutions. Voici le résultat:

Bonne nuit à tous

 

[mapomme]

Re @laurent3372 ,

Puisque c'est comme ça, je vais me coucher serein . Piksaw a sa solution (grâce à toi).

Bonne-nuit.

 

[Piksaw]

Hello ! merci beaucoup jolie surprise en me réveillant ce matin

tout fonctionne parfaitement !!!

est-ce possible tout de même d'avoir une version VBA avec le gâteau ça serait la cerise sur le gâteau hahaha bon ok la vanne un peu pourri j'avoue

Une bonne journée

 

[laurent3372]

La voilà, la cerise !

Il faut penser à remettre =AUJOURDHUI() en $C$1 lorsque les tests sont terminés

 

[Piksaw]

La voilà, la cerise !

Il faut penser à remettre =AUJOURDHUI() en $C$1 lorsque les tests sont terminés

hahaha merci beaucoup parc contre quand je vais dans la feuille variable pour entré les vrai prénom et les dates anniversaires il me renvoie une erreur visual basic erreur d'exécution il me dit l'élément portant ce nom est introuvable

 

[laurent3372]

Peux-tu poster ton fichier mis à jour ?

 

[Piksaw]

Peux-tu poster ton fichier mis à jour ?

Re, voilà le fichier avec les bonne date et prénom

 

[laurent3372]

J'ai arrangé les noms de champs, et créé des tables structurées dans la feuille Variables pour que tous les tableaux soient de taille dynamique.