XL 2016 adapter une formule pour trouver le 1 er vendredi de l'année

dindin

XLDnaute Occasionnel
Bonjour le Forum,

depuis ce matin j'essaye d'adapter cette formule , en vain.
mon but est d'afficher une date sous condition :

si le premier jour de l'année tombe un vendredi ,on affiche la date de ce vendredi, sinon on affiche le premier samedi de l'année:

VB:
=SI(DATE(ANNEE(AUJOURDHUI());1;1)=DATE(ANNEE(AUJOURDHUI());1;8)-JOURSEM(DATE(ANNEE(AUJOURDHUI());1;2));DATE(ANNEE(AUJOURDHUI());1;8)-JOURSEM(DATE(ANNEE(AUJOURDHUI());1;2));DATE(ANNEE(AUJOURDHUI());1;8)-JOURSEM(DATE(ANNEE(AUJOURDHUI());1;1)))

Merci pour votre aide.
 

dindin

XLDnaute Occasionnel
Bonjour à tous,

Avec l'année en "A2"
VB:
=SI(JOURSEM(DATE($A$2;1;1);2)=5;DATE($A$2;1;1);DATE($A$2;1;7)-JOURSEM(DATE($A$2;1;1)-6;3))

JHA
Bonjour JHA,
Merci pour ton aide.
je pense que je me suis mal exprimé, et je comprends maintenant pourquoi ta formule donne le même résultat que la mienne.

1660305977933.png

mon objectif est le suivant :

j'ai un évènement qui se répète tous les ans. le premier vendredi de l'année, sinon je le décale au premier samedi de l'année si le vendredi tombe en décembre.
exemple sur la photo pour 2023, la formule m'affiche samedi 7 janvier, sachant qu'il y a le vendredi 6 janvier qui tombe avant ( résultat erroné aussi pour 2023,2024 et 2025 aussi)

1660306573561.png



pour 2022 la formule donne un résultat juste, car le vendredi tombe le 31 décembre 2021:

1660306356261.png


je ne sais pas si mon explication est claire pour toi.


Après une petite modif cela fontionne:

VB:
=SI(JOURSEM(DATE($A$2;1;1);2)=5;DATE($A$2;1;1);SI(JOURSEM(DATE($A$2;1;1);2)=6;DATE($A$2;1;1);DATE($A$2;1;7)-JOURSEM(DATE($A$2;1;1)-5;3)))


1660306878110.png


Merci pour ton aide
 
Dernière édition:

TooFatBoy

XLDnaute Barbatruc
Bonjour,

Je vois bien que la question est déjà résolue, mais j'ai tout de même une interrogation... 😁

Est-ce que la question pourrait être formulée ainsi :
Si le jour de l'an est un samedi alors on affiche ce samedi, sinon on affiche le premier vendredi à compter du 1er janvier.
 

Discussions similaires

Statistiques des forums

Discussions
312 224
Messages
2 086 410
Membres
103 201
dernier inscrit
centrale vet