XL 2016 Trouver le premier jour de la semaine selon le mois

J

JHA

XLDnaute Barbatruc

• 16 Août 2021

• #2

Bonjour à tous,

A essayer

JHA

 

Pièces jointes

• Classeur lundi.xlsx

  9.5 KB · Affichages: 21

Vote positif 0 Vote négatif

Solution

L

Lolote83

XLDnaute Barbatruc

• 16 Août 2021

• #3

Bonjour,
Pas sur d'avoir tout compris.
Pour moi, le premier Lundi de Septembre 2021 est le 06/09/2021 et non le 30/09 comme tu le cites
@+ Lolote83

 

Vote positif 0 Vote négatif

L

Lolote83

XLDnaute Barbatruc

• 16 Août 2021

• #4

Re bonjour,
Exemple :
En A1 = Septembre
En A2 = DATEVAL("01/" & A1 & "/2021") te donnera donc le 01/09/2021
En A3 = A2+6-MOD(A2+4;7) te donnera donc le 06/09/2021 (soit le 1er lundi du mois de septembre 2021)
@+ Lolote83

 

Vote positif 0 Vote négatif

Dudu2

XLDnaute Barbatruc

• 16 Août 2021

• #5

Bonjour,

Pas sur d'avoir tout compris.

Cliquez pour agrandir...

Pareil !

 

Vote positif 0 Vote négatif

L

Lolote83

XLDnaute Barbatruc

• 16 Août 2021

• #6

Re bonjour,
Je viens de voir le fichier de JHA, et effectivement, j'ai mieux compris la demande.
Bravo à toi JHA, je penses que tu es dans le VRAI.
@+ Lolote83

 

Vote positif 0 Vote négatif

R

Rabeto

XLDnaute Occasionnel

• 16 Août 2021

• #7

Lolote83 à dit:

Bonjour,
Pas sur d'avoir tout compris.
Pour moi, le premier Lundi de Septembre 2021 est le 06/09/2021 et non le 30/09 comme tu le cites
@+ Lolote83

Cliquez pour agrandir...

Non, "A partir de ce mois, j'aimerai trouver le Lundi de la première semaine du mois,"

 

Vote positif 0 Vote négatif

Victor21

XLDnaute Barbatruc

• 16 Août 2021

• #8

Bonjour à tous.
Une autre interprétation de la 1° semaine d'un mois :
La première semaine du mois est celle qui contient au moins 4 jours de ce mois.

 

Pièces jointes

• 1° sem.xlsm

  10.1 KB · Affichages: 15

Vote positif 1 Vote négatif

R

Rabeto

XLDnaute Occasionnel

• 16 Août 2021

• #9

JHA à dit:

Bonjour à tous,

A essayer

JHA

Cliquez pour agrandir...

Bonjour JHA,
Merci, Oui ça donne bien le premier lundi de la première semaine début de Septembre.
Il y a une chose que je ne comprends pas, pourquoi lorsque je mets la formule =No.semaine() ça me donne un numero de semaine différent de ce que tu as trouvé.
La semaine du 1er Septembre c'est la semaine 36 alors que sur ton fichier ça donne 35

 

Pièces jointes

• Classeur lundi.xlsx

  9.4 KB · Affichages: 7

Vote positif 0 Vote négatif

J

JHA

XLDnaute Barbatruc

• 16 Août 2021

• #10

Bonjour à tous,

A essayer

VB:

=NO.SEMAINE(DATE($B$6;MOIS(1&$A$6);1);21)

Fonction NO.SEMAINE - Support Microsoft

Renvoie le numéro de semaine d’une date spécifique. Par exemple, la semaine contenant le 1er janvier est la première semaine de l’année ; elle est numérotée semaine 1.

support.microsoft.com

JHA

 

Vote positif 1 Vote négatif

R

Rabeto

XLDnaute Occasionnel

• 17 Août 2021

• #11

Victor21 à dit:

Bonjour à tous.
Une autre interprétation de la 1° semaine d'un mois :
La première semaine du mois est celle qui contient au moins 4 jours de ce mois.

Cliquez pour agrandir...

Bonjour Victor21,

Nickel, c'est ce que je voulais, merci

 

Vote positif 0 Vote négatif

GALOUGALOU

XLDnaute Accro

• 17 Août 2021

• #12

re le fil bonjour le forum

dans le message de Rabeto

La semaine du 1er Septembre c'est la semaine 36 alors que sur ton fichier ça donne 35

Cliquez pour agrandir...

juste pour info, car le besoin est peut-être différent de la norme évoquée ci-dessous.

Et pourtant en 2021 selon la norme iso la semaine commençant le 30 aout 2021 est bien la semaine 35.

un extrait de wikipédia
Le système (norme iso) est principalement utilisé par les gouvernements et entreprises pour baser également les années comptables et fiscales et la planification de projets à cycles hebdomadaires de travail, ainsi que pour le paiement des salaires ou des loyers (quand ceux-ci sont versés hebdomadairement).

cdt
galougalou

 

Pièces jointes

• calendrier-2021.pdf

  119.7 KB · Affichages: 4

Dernière édition: 17 Août 2021

Vote positif 1 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 17 Août 2021

• #13

re
bonjour
beaucoup ne font pas encore la différence en semaine N°X de l'année et semaine N°X du mois

la première semaine du mois au norme iso ne commence pas forcement le 1er du mois

donc ne pas confondre
le lundi de la semaine du 1er du mois
etl
le lundi de la 1ere semaine du mois

VB:

Dim mois&, an&, dat As Date, j&
Sub test() 'le lundi de la semaine du 1er du mois
mois = 9
an = 2021
dat = DateSerial(an, mois, 1)
j = Weekday(dat, vbUseSystemDayOfWeek)
If j <> 1 Then dat = dat - Weekday(dat, vbUseSystemDayOfWeek) + 1
MsgBox dat
End Sub

Sub test2() ' le premier lundi du mois ( ou de la première semaine du mois )
mois = 9
an = 2021
dat = DateSerial(an, mois, 7)
j = Weekday(dat, vbUseSystemDayOfWeek)
If j <> 1 Then dat = dat - Weekday(dat, vbUseSystemDayOfWeek) + 1
MsgBox dat
End Sub

 

Vote positif 1 Vote négatif