Discussion :

[VincentB_log]

Je me suis souvent demandé s'il était possible de faire un calendrier perpétuel sous Excel, sans aucune macro bien sur. La réponse est Oui !
J'ai placé les nombres de 1 à 31 en ligne, les mois en colonne, et l'année du calendrier en A1 (comme par hasard !).

A l'intersection de la ligne et de la colonne la formule suivante permet d'afficher le jour de la semaine :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=CHOISIR(JOURSEM(A3&"-"&$C$1&" "& $A$1);"Dimanche";"Lundi";"Mardi";"Mercredi";"Jeudi";"Vendredi";"Samedi";)

(Pour cela supposer le "1" en celulle A3 et "Janvier" en cellule C1)

Gestion du 29 février : facile, je passe par une MFC ! j'écris en blanc quand

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=ESTERREUR(D31)=VRAI()

Désolé de ne pas pouvoir poster le fichier, c'est interdit par le filtre de mon entreprise !


Vincent.

[Vadorblanc]

Bonjour
Super le calendrier, juste la MFC qui ne marche pas, 'la valeur de la cellule' 'est différente' '=ESTERREUR(D31)=VRAI()'
Si vous pouvez apporter des précisions
Merci

[VincentB_log]

C'est une formule en fait que je place pour gérer l'apparition ou pas du jour de la semaine du 29 février.

Formule égale à =ESTERREUR(D31)=VRAI()

Quand la formule est juste, j'écris en blanc. Logiquement ça devrait marcher chez vous, ça marche chez moi...

VincentB

[Vadorblanc]

Bonjour, ça ne marche pas, je mets le fichier en pièce jointe
Cordialement

[Qwazerty]

Salut
Juste pour info, lors de l'utilisation d'une fonction qui renvoie une valeur boolean, il n'est pas nécessaire de la comparait a Vrai ou Faux, ça allège l'écriture, surtout lorsque les formules sont déjà très longue.

Ainsi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=ESTERREUR(D31)=VRAI()

est équivalent à

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=ESTERREUR(D31)

Quand on y pense c'est assez logique car que renvoie

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ESTERREUR(D31)=VRAI()

, cette formule renvoie Vrai et pourtant on ne le vérifie pas en écrivant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=(ESTERREUR(D31)=VRAI())=Vrai() .....

[Edit]
Si je peux me permettre, au lieu d'utiliser une MFC pour mettre ton texte en blanc (ce qui ne marche que si la personne a un fond blanc) il est préférable de contrôler en amont dans la formule du tableau et d'afficher une chaine vide si le jour n'existe pas.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=SI(ESTERREUR(JOURSEM($A3&"-"&C$1&" "&$A$1));"";CHOISIR(JOURSEM($A3&"-"&C$1&" "&$A$1);"Dimanche";"Lundi";"Mardi";"Mercredi";"Jeudi";"Vendredi";"Samedi"))

cette formule et a placer en C3 et a étendre
Je me suis permis aussi de corrigé les références aux cellules $A3 et C$1 afin que la formule puisse être étendu a l'ensemble du tableau sans avoir a faire de modification.
[/Edit]
A++
Qwaz

[Vadorblanc]

Génial, un simple copier coller de cette formule sur l'ensemble du tableau et tout est ok.
MERCI

[lianguja]

Bonjour,

Remplacez le =CHOISIR(JOURSEM($A3&"-"&C$... par =TEXTE(A2;"jjjj")

Formule Description (résultat)
=TEXTE(A2;"jjjj") Calcule le jour de la semaine correspondant à la date et renvoie le nom complet du jour de la semaine (Lundi)
=TEXTE(A2;"jjj") Calcule le jour de la semaine correspondant à la date et renvoie le nom abrégé du jour de la semaine (Mar)