Bonjour,
Dans ce filet de macro, appelé via une "private sub", le PC ouvre la feuille
baptisée 2013 (merci Denis)
Ensuite, il me colorie d'abord les dates d'anniversaire et de congés en
général (Pâques, Noël ....)
Puis, colorie la date du jour.
Problème: dans quelques jours, il y aura le changement d'année. Ce sera Ok
pour le choix de la feuille (re-merci Denis), mais les dates ...
Comment puis-je faire comprendre à ce gros nigaud (le PC) qu'il doit faire
41282+365 (et, mieux: 366 pour les années bissextiles)?
N'y aurait-il pas moyen de faire un truc du genre : case 41282=case +nb
jours de l'année du nom de la feuille?
---------------------------------------------
Sub calend()
Worksheets(CStr(Year(Date))).Select ' Merci Denis
For Each C In Range("A2:L32")
C.Interior.ColorIndex = xlnonne ' enlève toutes les couleurs
If [C] <> "" Then
If Weekday(C) = 7 Or Weekday(C) = 1 Then C.Interior.ColorIndex = 44
End If ' colorie les WE
Select Case CLng(C.Value) 'Case C.Value + met en couleur
différentes dates
Case 41282, 41298, 41364, 41365, 41402, 41476, 41487, 41498,
41501, 41579, 41589, 41633
C.Interior.ColorIndex = 38
End Select
If [C] = Date Then C.Interior.ColorIndex = 42 ' colorie la date du jour
Next
End Sub
---------------------------------------
http://cjoint.com/?CLvqm5ob7fG
------------------------------------------
Déjà merci
Bon WE à tous.
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
Nos gouvernements respectifs n'ont pas encore envisagé de taxer la lecture du forum. Mais, je l'écris en tout petit pour ne pas leur donner des idées. De ce fait, tu peux donc continuer à lire, moyennant petite rétribution aux auteurs des réponses..... La méthode de Denis , en Visual Basilic est géniale, très souple et permet une longue carrière.(-->9.999) Celle de Jacky, la MEFC, demande plus de concision car dès que la première condition est remplie, elle ne s'occupe pas des autres. Il faudra donc bien veiller à les faire dans le bon ordre..... comme en VBA. MEFC = le premier qui frappe a raison et en VBA, c'est le dernier. Tu as le choix. Ces deux solutions me plaisent et répondent à mes souhaits. A toi de choisir ton mode de transport pour arriver à destination. Bonne journée.
Jacquouille
" Le vin est au repas ce que le parfum est à la femme." "Albert" a écrit dans le message de groupe de discussion : l95a83$shf$
"Jacquouille" a écrit dans le message de news:l9555a$gdo$
Bonsoir Albert
Le 3° Jacques fait bien les choses aussi. Cependant, je trouve plus élégant de mettre un si(estvide(a3); ..... que mettre le lettrage en blanc. Pour peu que l'on veuille colorer le fond du calendrier et qu'on ne sache pas bricoler la MEFC ..... La formule de Jacky est plus mieux, AMHA. Mais, merci pour cette approche. Jacquouille
Bonjour / Bonsoir
C'est vrai qu'un si(estvide(a3); est plus élégant que mettre lle lettrage en blanc mais avec la matricielle de JB elle n'est pas vide. Mais ce que je trouvais difficile c'est de mettre le numéro du jour pour 2013 et de rajouter 365 pour 2014 et ainsi refaire ce calcul pour chaque année à venir, pour cette raison la MEFC de Jacky esst disons beaucoup plus mieux.
Permettez moi de continuer à suivre vos intéressants projets.
-- albertri-at-videotron.ca.invalid
Nos gouvernements respectifs n'ont pas encore envisagé de taxer la lecture
du forum. Mais, je l'écris en tout petit pour ne pas leur donner des idées.
De ce fait, tu peux donc continuer à lire, moyennant petite rétribution aux
auteurs des réponses.....
La méthode de Denis , en Visual Basilic est géniale, très souple et permet
une longue carrière.(-->9.999)
Celle de Jacky, la MEFC, demande plus de concision car dès que la première
condition est remplie, elle ne s'occupe pas des autres. Il faudra donc bien
veiller à les faire dans le bon ordre..... comme en VBA.
MEFC = le premier qui frappe a raison et en VBA, c'est le dernier.
Tu as le choix.
Ces deux solutions me plaisent et répondent à mes souhaits.
A toi de choisir ton mode de transport pour arriver à destination.
Bonne journée.
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"Albert" a écrit dans le message de groupe de discussion :
l95a83$shf$1@speranza.aioe.org...
"Jacquouille" <j.thiernesse@skynet.be> a écrit dans le message de
news:l9555a$gdo$1@speranza.aioe.org...
Bonsoir Albert
Le 3° Jacques fait bien les choses aussi.
Cependant, je trouve plus élégant de mettre un si(estvide(a3); ..... que
mettre le lettrage en blanc. Pour peu que l'on veuille colorer le fond du
calendrier et qu'on ne sache pas bricoler la MEFC .....
La formule de Jacky est plus mieux, AMHA.
Mais, merci pour cette approche.
Jacquouille
Bonjour / Bonsoir
C'est vrai qu'un si(estvide(a3); est plus élégant que mettre lle lettrage
en blanc mais avec la matricielle de JB elle n'est pas vide.
Mais ce que je trouvais difficile c'est de mettre le numéro du jour pour
2013 et de rajouter 365 pour 2014 et ainsi refaire ce calcul pour chaque
année à venir, pour cette raison la MEFC de Jacky esst disons beaucoup plus
mieux.
Permettez moi de continuer à suivre vos intéressants projets.
Nos gouvernements respectifs n'ont pas encore envisagé de taxer la lecture du forum. Mais, je l'écris en tout petit pour ne pas leur donner des idées. De ce fait, tu peux donc continuer à lire, moyennant petite rétribution aux auteurs des réponses..... La méthode de Denis , en Visual Basilic est géniale, très souple et permet une longue carrière.(-->9.999) Celle de Jacky, la MEFC, demande plus de concision car dès que la première condition est remplie, elle ne s'occupe pas des autres. Il faudra donc bien veiller à les faire dans le bon ordre..... comme en VBA. MEFC = le premier qui frappe a raison et en VBA, c'est le dernier. Tu as le choix. Ces deux solutions me plaisent et répondent à mes souhaits. A toi de choisir ton mode de transport pour arriver à destination. Bonne journée.
Jacquouille
" Le vin est au repas ce que le parfum est à la femme." "Albert" a écrit dans le message de groupe de discussion : l95a83$shf$
"Jacquouille" a écrit dans le message de news:l9555a$gdo$
Bonsoir Albert
Le 3° Jacques fait bien les choses aussi. Cependant, je trouve plus élégant de mettre un si(estvide(a3); ..... que mettre le lettrage en blanc. Pour peu que l'on veuille colorer le fond du calendrier et qu'on ne sache pas bricoler la MEFC ..... La formule de Jacky est plus mieux, AMHA. Mais, merci pour cette approche. Jacquouille
Bonjour / Bonsoir
C'est vrai qu'un si(estvide(a3); est plus élégant que mettre lle lettrage en blanc mais avec la matricielle de JB elle n'est pas vide. Mais ce que je trouvais difficile c'est de mettre le numéro du jour pour 2013 et de rajouter 365 pour 2014 et ainsi refaire ce calcul pour chaque année à venir, pour cette raison la MEFC de Jacky esst disons beaucoup plus mieux.
Permettez moi de continuer à suivre vos intéressants projets.
