date et calendrier

2 réponses

Cynoq

18/02/2005 à 11:48

Bonjour,
J'ai un gros mytère à élucider.

Je possède un tableau où je retrouve ce genre de données ( le symbole |
sépare les colonnes) :

du | 1er jour du mois | au | vendredi
du | lundi suivant | au | vendredi suivant
du | lundi suivant | au | vendredi suivant
du | lundi suivant | au | vendredi suivant
du | lundi suivant | au | dernier jour du mois

J'aimerai automatiser ce tableau, en sachant que le premier jour du mois
doit être le lundi, ou mardi, ou mercredi, ou jeudi, ou vendredi. Et le
dernier jour du mois doit être autre chose que le samedi ou le dimanche.
Bref, je veux afficher les semaines allant du 1er au dernier jour du mois en
oubliant les samedi et dimanche.

Quelqu'un peut m'aiguiller sur ce problème ?

Merci d'avance et à bientôt.

2 réponses

poy-poy

18/02/2005 à 14:45

Bonjour Cynoq,

voici une formule (en anglais ) pour savoir quel était le premier jour du moi
=IF(OR(WEEKDAY("01/01/2005";2)=6;WEEKDAY("01/01/2005";2)=7);"Lundi";index({"Lundi";"Mardi";"Mercredi";"Jeudi";"Vendredi"};WEEKDAY("01/01/2005";2)))

Bon, if c'est si, or c'est ou, index c'est index et weekday c'est ??? en
francais. Regarde l'aide pour créer une formule dans les fonctions date et
heure, tu en cherches une qui te sort le numéro du jour de la semaine en
fonction de la date.
Il faut que tu entres le 1er jour du bon mois pour la 1ere formule et le 1er
jour du mois suivant pour la 2eme.

Pour le dernier jour du mois, la formule devient
=IF(OR(WEEKDAY("01/02/2005";2)=7;WEEKDAY("01/02/2005";2)=1);"Vendredi";INDEX({"Lundi";"Mardi";"Mercredi";"Jeudi";"Vendredi"};WEEKDAY("01/02/2005";2)-1))

Cordialement
Benjamin

Bonjour,
J'ai un gros mytère à élucider.

Je possède un tableau où je retrouve ce genre de données ( le symbole |
sépare les colonnes) :

du | 1er jour du mois | au | vendredi
du | lundi suivant | au | vendredi suivant
du | lundi suivant | au | vendredi suivant
du | lundi suivant | au | vendredi suivant
du | lundi suivant | au | dernier jour du mois

J'aimerai automatiser ce tableau, en sachant que le premier jour du mois
doit être le lundi, ou mardi, ou mercredi, ou jeudi, ou vendredi. Et le
dernier jour du mois doit être autre chose que le samedi ou le dimanche.
Bref, je veux afficher les semaines allant du 1er au dernier jour du mois en
oubliant les samedi et dimanche.

Quelqu'un peut m'aiguiller sur ce problème ?

Merci d'avance et à bientôt.

docm

19/02/2005 à 11:31

Bonjour.

Tu peux le faire avec les fonctions VBA WeekDay et DateAdd.

Sub SemainesDuMois()

mois = 2
annee = 2005
premierjour = DateSerial(annee, mois, 1)

premierlundi = premierjour
lundi = 2
While WeekDay(premierlundi) <> lundi
premierlundi = DateAdd("d", 1, premierlundi)
Wend

premierjourdelasemaine = premierlundi
dernierjourdelasemaine = DateAdd("d", 4, premierjourdelasemaine)
ligne = 0
While Month(premierjourdelasemaine) = mois
ligne = ligne + 1
Cells(ligne, 2) = premierjourdelasemaine
Cells(ligne, 4) = dernierjourdelasemaine

premierjourdelasemaine = DateAdd("d", 7, premierjourdelasemaine)
dernierjourdelasemaine = DateAdd("d", 7, dernierjourdelasemaine)

Wend
End Sub

Amicalement.

"Cynoq" wrote in message
news:cv4h2g$1vg$

Bonjour,
J'ai un gros mytère à élucider.

Je possède un tableau où je retrouve ce genre de données ( le symbole |
sépare les colonnes) :

du | 1er jour du mois | au | vendredi
du | lundi suivant | au | vendredi suivant
du | lundi suivant | au | vendredi suivant
du | lundi suivant | au | vendredi suivant
du | lundi suivant | au | dernier jour du mois

J'aimerai automatiser ce tableau, en sachant que le premier jour du mois
doit être le lundi, ou mardi, ou mercredi, ou jeudi, ou vendredi. Et le
dernier jour du mois doit être autre chose que le samedi ou le dimanche.
Bref, je veux afficher les semaines allant du 1er au dernier jour du mois
en

oubliant les samedi et dimanche.

Quelqu'un peut m'aiguiller sur ce problème ?

Merci d'avance et à bientôt.

date et calendrier

2 réponses

Veuillez sélectionner un problème