mise en forme conditionnelle à partir d'une macro

crown54

XLDnaute Junior
Bonjour à tous,

voilà ma demande, je souhaiterais dans un tableau (planning plutôt), que lorsque je rentre dans les cellules de la ligne 1 les termes sam et dim que soient remplies par un motif toutes les cellules qui se situent non pas immédiatement en dessous mais à partir de 2 lignes en dessous.
Peut on faire cela à partir de l'éditeur vba et si oui de quelle manière?
Merci pour vos réponses et bonne journée
 

Pièces jointes

  • exemple.xlsx
    9.9 KB · Affichages: 20
  • exemple.xlsx
    9.9 KB · Affichages: 27
  • exemple.xlsx
    9.9 KB · Affichages: 24

DoubleZero

XLDnaute Barbatruc
Re : mise en forme conditionnelle à partir d'une macro

Bonjour à toutes et à tous,

Bienvenue sur XLD, crown54.

Un essai, avec cette macro placée dans un module standard.

Code:
Option Explicit
Sub Griser()
    Dim c As Range
    For Each c In Rows("1:1").SpecialCells(xlCellTypeConstants, 23)
        'adapter le nombre de ligne (ici : 100)
        If c = "sam" Or c = "dim" Then c.Offset(2, 0).Resize(100).Interior.Pattern = xlGray50
    Next
End Sub

A bientôt :)
 

Discussions similaires

Statistiques des forums

Discussions
312 304
Messages
2 087 065
Membres
103 451
dernier inscrit
Souleymane