• Initiateur de la discussion Initiateur de la discussion Victor
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Victor

XLDnaute Impliqué
Bonjour le forum,

est-il possible selon la colonne de gauche ou est indiqué Lundi ou mardi que sur la colonne à côté sur la droite commence le 1er jour selon le m ois et l'année d'une autre cellule ?

D'avance merci.

un fichier pour + d'explications
 

Pièces jointes

Re : Date selon jour

Bonjour Victor,

ta demande en l'état est trop imprécise pour pouvoir y réponde. D'autant que sur le fichier il n'y a aucun exemple de ce que tu souhaite obtenir....

Essaie de formuler ta question differement. Telle que formulée on peut croire que tu shouhaiterai faire en sorte que le mois commence par le jour de semaine à volonté (ex:je voudrais que tel mois de telle année commence un Lundi ). 🙄

A bientôt
 
Re : Date selon jour

bonjour Victor

Une macro a appliquer a chaque feuille de mois

Code:
Sub test()
Range("B5:B44").ClearContents
Columns("B:B").NumberFormat = "d"
x = CDate("01/" & Range("A1") & "/" & Range("D1"))
fin = CDate("01/" & Month(x) + 1 & "/" & Range("D1")) - 1
For n = 5 To 12
 If Format(x, "dddd") = Range("A" & n) Then debut = n
Next n
For n = x To fin
 Range("B" & debut) = n
 debut = debut + 1
Next n
End Sub

Edit : salut Hasco
Salut kjin
 

Pièces jointes

Re : Date selon jour

Re,

=SI(JOURSEM($A$1;2)=LIGNE()-4;$A$1;A4+1)

Placé en ligne 5 =LIGNE()-1 donne 1
JOURSEM($A$1;2) donne un chiffre de 1 à 7 de la date en A1 où le 1 est le Lundi, le 2 le Mardi... et le 7 est le Dimanche (grâce au ;2 de la fonction)

Donc si le jour de la semaine de la date en A1 est égale à 1 (donc un lundi) mettre la date en A1 sinon mettre A4 + 1).

Cette "méthode" permet des recopies vers le bas sans avoir à modifier la formule (pour la droite, utiliser COLONNE())

Toutes les dates sont présentes mais masquées par la MeFC

A+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
8
Affichages
569
Réponses
11
Affichages
666
Réponses
8
Affichages
431
  • Question Question
Microsoft 365 Formule ou VBA
Réponses
6
Affichages
311
  • Question Question
Microsoft 365 tri mobile
Réponses
5
Affichages
507
Réponses
5
Affichages
551
Réponses
6
Affichages
505
Retour