colorer une cellule au format date

Modeste

XLDnaute Barbatruc

• 1 Février 2011

• #2

Re : colorer une cellule au format date

Bonjour dubdub,

Pour la MFC, essaie la fonction joursem()
Weekday existe en également en vba

Si tu coinces, un petit exemple en pièce jointe serait le bienvenu

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 1 Février 2011

• #3

Re : colorer une cellule au format date

Bonjour Dubdub, Modeste , le Forum,

Ci-joint un essai par MFC uniquement.

 

Pièces jointes

• 00 Dubdub.xls

  23.5 KB · Affichages: 94

Vote positif 0 Vote négatif

G

Guest

Guest

• 1 Février 2011

• #4

Re : colorer une cellule au format date

Bonjour Double zero,Modeste.
merci pour la MFC c'est parfait,si quelqu'un connait en VBA avec les mêmes conditions ?
amicalement

 

Vote positif 0 Vote négatif

Modeste

XLDnaute Barbatruc

• 1 Février 2011

• #5

Re : colorer une cellule au format date

Re-bonjour dubdub, salut DoubleZero

On ne pourra pas t'accuser, dubdub d'en faire trop
Dans le fichier de 00 (sans mfc), essaye

Code:

Sub Yes_We_Can()
    For Each c In Range("B1:B" & Range("B65000").End(xlUp).Row)
        If Weekday(c.Value, 2) > 5 Then Range(c, c.Offset(0,-1)).Interior.ColorIndex = 15
    Next c
End Sub

 

Dernière édition: 1 Février 2011

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 1 Février 2011

• #6

Re : colorer une cellule au format date

Re-bonjour,

Merci, Modeste ! La recette est dans ma boite à trésors !

P.S. : à ce jour, + - 7 mois sans tabac ??? Si "oui", BRAVO ADMIRATIF ...

 

Vote positif 0 Vote négatif

Modeste

XLDnaute Barbatruc

• 1 Février 2011

• #7

Re : colorer une cellule au format date

re²,

DoubleZero à dit:

La recette est dans ma boite à trésors

Cliquez pour agrandir...

Comme tu y vas! Ca reste de la cuisine au quotidien, hein, pas de la gastronomie

Un peu moins de 7 mois (comparé à 25 ans "avec") le mérite est discutable (d'autant que je m'en passe bien plus facilement que je ne l'aurais cru)

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 1 Février 2011

• #8

Re : colorer une cellule au format date

Re-bonjour,

@ Modeste,

Modeste à dit:

Comme tu y vas! Ca reste de la cuisine au quotidien, hein, pas de la gastronomie

Un peu moins de 7 mois (comparé à 25 ans "avec") le mérite est discutable (d'autant que je m'en passe bien plus facilement que je ne l'aurais cru)

Cliquez pour agrandir...

Un immense sourire pour trois raisons :

- n'avalant et ne proposant que des "sandwiches" , ta recette (comme tant d'autres) relève, pour ce qui me concerne, de la gastronomie !

- ton mérite est indiscutable car "poison tabac" continue de me coûter !

- Belgique, chère à mon coeur...

A bientôt .

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 2 Février 2011

• #9

Re : colorer une cellule au format date

Bonjour à tous
j'adore le yes we can
merci à tous et bonne journée

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 2 Février 2011

• #10

Re : colorer une cellule au format date

modeste j'ai oublié de te demander pour une plage du planning de A3 à AV33 que dois-je modifier ?
cdt

 

Vote positif 0 Vote négatif

Modeste

XLDnaute Barbatruc

• 2 Février 2011

• #11

Re : colorer une cellule au format date

Bonjour,

pour une plage du planning de A3 à AV33 que dois-je modifier ?

Cliquez pour agrandir...

Il faudrait peut-être aussi préciser dans quelle colonne figurerait la date

Petit indice: la propriété Offset, utilisée dans le premier code, permet de "décaler" la référence à une cellule d'un certain nombre de lignes et de colonnes.
Ou pourrait aussi utiliser cette autre syntaxe:

Code:

Range("A" & c.Row & ":AV" & c.Row).Interior.ColorIndex = 15

... si 'c' représente la cellule contenant une date

 

Vote positif 0 Vote négatif