Formatage conditionnel

Bonsoir à tous,

Je sollicite votre aide pour une petite macro simple mais compliquée pour moi .

En vérité je préfère même une formule si la chose est possible.

Dans le fichier joint vous verrez 5 chiffres dans les cellules B5 : F5 ( 16_12_4_5_2 ).

Je voudrais dire à Excel de rechercher ces chiffres dans les plages suivantes :

B17 : U17

B20 : U20

B27 : U151

et de leur appliquer le même format que la plage B5 : F5.

En d' autres termes, dans les 3 plages citées chaque fois qu' il sera trouvé le chiffre 4 il devra être blanc sur fond bleu, tous les 16 seront rouges sur fond jaune, ainsi de suite.

Je vous remercie d' avance à tous pour votre aide.

Salut,

Point besoin de macro, une simple mise en forme conditionnelle bien paramétrée, te fais ça tranquille.

Leakim

bonsoir,

hello leakim

une proposition via une macro, si on ne souhaite pas devoir modifier les MFCs à chaque changement de valeur.

Sub colorie()
    Range("B17:U17,B20:U20,B27:U151").ClearFormats
    For Each v In Range("B5:F5")
        n = Replace(v.Value, " ", "") * 1
        bc = v.Interior.Color
        fc = v.Font.Color

        Set re = Range("B17:U17,B20:U20,B27:U151").Find(n, lookat:=xlWhole, LookIn:=xlValues)
        If Not re Is Nothing Then
            fa = re.Address
            Do
                re.Interior.Color = bc
                re.Font.Color = fc
                Set re = Range("B17:U17,B20:U20,B27:U151").FindNext(re)
            Loop Until re.Address = fa
        End If
    Next v
End Sub

Tout d' abord je voudrais vous remercier tous les 2 pour votre aide et c' est bien ce résultat auquel je voulais arriver.

Toutefois je ne comprends pas pourquoi cela ne fonctionne pas pour la colonne B27 : U151? Aucun des chiffres de cette colonne n' a reçu de formatage. Pourtant les bonnes références ont été mises dans ton code h2so4. Même chose pour toi leakim, dans ton fichier la colonne B27 : U151 n' a pas été prise en compte.

Vous pouvez vérifier vous-même.

Merci d' avance

bonjour,

ton fichier avec la macro et le résultat

C' est génial, ça fonctionne

Je vous remercie tous les deux pour votre aide et le temps que vous avez pris pour m' aider gratuitement, c' est vraiment sympa de votre part.

Je vous souhaite une très bonne journée