Mise en forme conditionnelle d'une colonne

ched64 Messages postés 54 Statut Membre -  
via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'utilise dans le cadre de mon travail un fichier qui est tout automatisé à l'aide de macro.
Je veux y rajouter une mise en forme conditionnelle mais je n'arrive pas, en mettant une mise en forme normal, celle-ci est écrasée par la macro, je dois donc passer obligatoirement par une MACRO.

La mise en forme souhaitée est la suivante :
Si la cellule "AB1" est égale à "S17"
ET SI la cellule "AB4" est égale à "J21"
ALORS collorer les celulle en "Orange" de "AB5" jusqu'à la dernière cellule du tableau.

Merci de votre aide,

3 réponses

  1. Vaucluse Messages postés 27336 Date d'inscription   Statut Contributeur Dernière intervention   6 453
     
    Bonjour
    il faudrait peut être travailler sur ce qui, dans la macro, écrase la, mise en forme pour pouvoir utiliser une conditionnelle.
    crdlmnt

    0
  2. ched64 Messages postés 54 Statut Membre
     
    Bonjour,
    Merci d'avoir pris le temps de répondre,

    J'ai déjà étudié cette option, mais aprés en avoir parlé avec mon supérieur, il aimerai que cela soit fait en macro comme le reste du fichier.
    Je suis donc obligé de passer par une macro ce qui n'est pas mon fort...

    Si jamais quelqu'un sais comment écrire le passage voulu,
    Cordialement,
    0
  3. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
     
    Bonjour

    Sub colorie()
    If Sheets("Feuil1").Range("AB1") = Sheets("Feuil1").Range("S17") And Sheets("Feuil1").Range("AB4") = Sheets("Feuil1").Range("J21") Then
    For n = 5 To Sheets("Feuil1").Range("AB" & Rows.Count).End(xlUp).Row
    Sheets("Feuil1").Range("AB" & n).Interior.ColorIndex = 44
    Next
    End If
    End Sub

    Remplacer Feuil1 par le nom de ta feuille dans la macro

    Cdlmnt
    0