Week end en couleur

En colonne A j'ai une série de dates. Je voudrais que lorsque ces dates correspondent à un
samedi ou à un dimanche, toute la ligne correspondante soit mise en couleur.

Sélection ligne 1 > Format > Mise en forme conditionnelle > la formule est : =OU(JOURSEM()=1;JOURSEM()=7) > Couleur motif ou autre > OK Pour avoir le même format sur les lignes suivantes : copie de la ligne1 > collage spécial > format > sur les lignes choisies. en VBA maintenant : 

sub jourWE()
 Dim i&
 Application.ScreenUpdating = False
  For i = 1 To [A65536].End(xlUp).Row
    If Weekday(Cells(i, 1).Value, 2) > 5 Then _
      Cells(i, 1).EntireRow.Interior.ColorIndex = 36
  Next i
 end sub

Auteurs : ,

Mots clefs associés à cette page : , , , , , , ,

Comment modifier Weeek end en couleur?

Par BROUCA, le lun 13/04/2009 - 23:07.

Bonjour
J'ai repris la MACRO sub jourWE() et j'ai essayé de la modifier pour que lorsque les dates, de la colonne A, correspondent à un samedi ou à un dimanche, une cellule de la ligne correspondante soit mise en couleur.
Je n'arrive pas à avoir le résultat voulu.
Merci pour votre aide

Cordialement

Lilianfred

MPFE

Par Misange, le mar 14/04/2009 - 07:26.

Merci de poser vos questions sur le forum MPFE. Cet espace est destiné à recevoir des commentaires, des compléments d'information, à signaler une erreur dans l'astuce, mais ce n'est pas un forum.

Misange