Convertir une date en Neme joursem du mois

[anthony_fr]

Bonjour,

J'ai cherché mais je n'ai trouvé que la formule inverse.....

Moi je souhaite calculer a partir d'une date en A1 si c'est par exemple le 2eme lundi du mois.

Ex si A1 = 25 mai 2013 alors Joursem(A1) = 6 c'est a dire Vendredi

OK mais je souhaite trouver une formule qui me retournerais la valeur 4 puisque c'est le 4 vendredi du mois.

D'avance merci a vous

 

[pierrejean]

Re : Convertir une date en Neme joursem du mois

Bonjour anthony

Avec une fonction personnalisée

 

[Dugenou]

Re : Convertir une date en Neme joursem du mois

Bonjour,
Pour le fun !

Salut Pierrejean et bravo c'est beaucoup plus light que ma solution de bourrin formuliste !😉

 

[pierrejean]

Re : Convertir une date en Neme joursem du mois

Re

Voici la version Vba donnant le même résultat que la brillante étude de Dugenou

PS: Il m'a fallu un petit moment pour décortiquer la formule (et d'abord pour la dénicher !!!)

 

[Dugenou]

Re : Convertir une date en Neme joursem du mois

Je reconnais avoir fait tout mon possible pour bien cacher la méthode que je n'étais pas fier, je voulais me rattraper sur la présentation !
🙂

 

[anthony_fr]

Re : Convertir une date en Neme joursem du mois

Merci PierreJean pour cette solution qui me convient parfaitement.

 

[david84]

Re : Convertir une date en Neme joursem du mois

Bonsoir,
je n'ai pas tout suivi ni tout regardé mais une solution formule matricielle à tester à partir de ce que j'en ai compris :

=SOMME(N(SI(JOURSEM(DATE(ANNEE(A1);MOIS(A1);LIGNE($1:$31)))=JOURSEM(A1);DATE(ANNEE(A1);MOIS(A1);LIGNE($1:$31)))<=A1))

A+

 

[Habitude]

Re : Convertir une date en Neme joursem du mois

Bonjour à tous

@pierrejean

Je me trompe peut-être, mais je crois qu'on peut remplacer la boucle par

m_j_m = INT((ladate - premierjourmois) / 7) + 1

Car en formule j'obtiens ceci

=ENT((A1-DATE(ANNEE(A1);MOIS(A1);1))/7)+1

 

[anthony_fr]

Re : Convertir une date en Neme joursem du mois

Je laisse a PierreJean le soin de répondre, mais j'ai pour ma part l'impression que la solution de PierrreJean appelle moins de fonctions et donc est plus optimisées.

 

[Modeste geedee]

Re : Convertir une date en Neme joursem du mois

Bonsour®

Bonjour pierrejean

Car en formule j'obtiens ceci

=ENT((A1-DATE(ANNEE(A1);MOIS(A1);1))/7)+1

autre formulation plus courte...🙄
plus évidente :
=ENT((JOUR(A1)+6)/7)
et en plus bavarde ...😎
=ENT((JOUR(A1)+6)/7)&"e "&TEXTE(A1;"jjjj")& " de " &TEXTE(A1;"mmmm")

 

[anthony_fr]

Re : Convertir une date en Neme joursem du mois

autre formulation plus courte...🙄
plus évidente :
=ENT((JOUR(A1)+6)/7)

J'adore ! Merci !

 

[pierrejean]

Re : Convertir une date en Neme joursem du mois

Re

Bien sur Habitude , tu as parfaitement raison
Mais Modeste geedee et toi savez bien qu'en formule je ne suis qu'une quiche (et que j'ai une certaine tendance à apprécier les boucles)

 

[Habitude]

Re : Convertir une date en Neme joursem du mois

Bonsour®


autre formulation plus courte...🙄
plus évidente :
=ENT((JOUR(A1)+6)/7)
et en plus bavarde ...😎
=ENT((JOUR(A1)+6)/7)&"e "&TEXTE(A1;"jjjj")& " de " &TEXTE(A1;"mmmm")

Honte à moi.
La date moins premier jour donne bien le jour de la date -1
C'est pourquoi, plutot que d'ajouter 1 au resultat (1 sem) tu ajoute 6 jours.

 

[Modeste geedee]

Re : Convertir une date en Neme joursem du mois

Bonsour®

../.. j'ai une certaine tendance à apprécier les boucles

😉 nostalgie capillaire ou bien déformation Cobolistique ???