date du dernier lundi pour le mois en cours (ou autre jour)

[motmot]

Bonjour à tous

Alors voici mon problème, je dois créer un programme qui remplit un planning dynamique, il suffit de choisir la période (mensuel, bimensuel...), le jour, et le moment (début de mois, milieu de mois et fin de mois)

Tout va bien pour le début et milieu de mois mais je coince pour le fin de mois, j'aurais besoin de connaitre le dernier lundi du mois en cours (ou un autre jour choisi) et je vois pas du tout comment faire, existe-t-il une fonction ou astuce pour déterminer ça, et en VBA si c'est possible.

Merci de votre aide

motmot

 

[Tibo]

Re : date du dernier lundi pour le mois en cours (ou autre jour)

Bonsoir motmot et bienvenue,

Un essai parmi d'autres :

Avec une date en A1 :

=DATE(ANNEE(A1);MOIS(A1)+1;0)-JOURSEM(DATE(ANNEE(A1);MOIS(A1)+1;0);3)

Donne le dernier lundi du mois

@+

 

[Compte Supprimé 979]

Re : date du dernier lundi pour le mois en cours (ou autre jour)

Bonjour Motmot et bienvenue

Salut ami Tibo

Un petit fichier pratique, pourquoi faire simple quand on peux faire plus compliqué

A+

 

[motmot]

Re : date du dernier lundi pour le mois en cours (ou autre jour)

Bonjour et merci à vous deux,

C'est parfaitement ce que je cherchais à faire. Tout fonctionne cette fois, mon fichier marche à merveille maintenant.

@+

 

[kiki93]

Re : date du dernier lundi pour le mois en cours (ou autre jour)

Bonsoir motmot et bienvenue,

Un essai parmi d'autres :

Avec une date en A1 :

=DATE(ANNEE(A1);MOIS(A1)+1;0)-JOURSEM(DATE(ANNEE(A1);MOIS(A1)+1;0);3)

Donne le dernier lundi du mois

@+

Bonjour
si vous pouviez expliquer la logique de la formule cela serait magnifique. Je n'ai pas réussi à la comprendre malheureusement.
Merci.

 

[job75]

Bonsoir kiki93,

La formule de Tibo peut s'écrire plus simplement :

=FIN.MOIS(A1;0)-JOURSEM(FIN.MOIS(A1;0);3)

Voyez l'aide Excel sur JOURSEM(date;3).

C'est 0 si date est un lundi, 1 si date est un mardi, 2 si date est un mercredi etc...

En soustrayant ce nombre au dernier jour du mois on trouve donc le dernier lundi.

A+

 

[kiki93]

Bonsoir kiki93,

La formule de Tibo peut s'écrire plus simplement :

=FIN.MOIS(A1;0)-JOURSEM(FIN.MOIS(A1;0);3)

Voyez l'aide Excel sur JOURSEM(date;3).

C'est 0 si date est un lundi, 1 si date est un mardi, 2 si date est un mercredi etc...

En soustrayant ce nombre au dernier jour du mois on trouve donc le dernier lundi.

A+

Merci j'ai compris la logique

 

[oguruma]

bsr, voir les post dans le forum trucs & astuces à propos de LAMBDA il y a un sur ce que j'appelle les dates remarquables. ça te devrait amener de l'eau à ton moulin

Merci j'ai compris la logique