Couleurs des cellules.

VINCENTNINI · 5 Juin 2016

Bonjours à tous.......
Je me casse la tête afin de supprimer des lignes dans lesquelles la cellule de référence est d'une certaine couleur.
Si la couleur a été modifiée manuellement via la propriété de la cellule, cela fonctionne.
Si la couleur a été modifiée via une mise en forme conditionnelle, cela ne fonctionne pas......
Je suppose que la propriété de la cellule affectée par ces deux méthode de coloriage n'est pas la même dans les 2 cas.....
J'utilise le code suivant

With ThisWorkbook.ActiveSheet

For i = 1 To 200

If .Range("A" & i).Interior.ColorIndex = 2 Then
.Rows(i).Delete
End If
Next i
End With

Merci d'avance pour votre réponse.

Robert · 5 Juin 2016

Re : Couleurs des cellules.

Bonjour Vincent, bonjour le forum,

Pour les cellules avec MFC il faut utiliser la Condition de la MFC plutôt que sa couleur.
Par exemple si la cellule est rouge via une MFC : si Cellule > 5 alors couleur rouge
alors le code devient :

Code:

With ActiveSheet
     For i = 1 To 200
          If .Range("A" & i).Value > 5 Then
          .Rows(i).Delete
     End If
            Next i
 End With

VINCENTNINI · 5 Juin 2016

Re : Couleurs des cellules.

.... j'aurais du y songer !!!!!
Merci et bonne semaine !

Couleurs des cellules.

VINCENTNINI

XLDnaute Nouveau

Robert

XLDnaute Barbatruc

VINCENTNINI

XLDnaute Nouveau

Discussions similaires