Bonjour,
J'aimerais pouvoir supprimer une ligne si une cellule de cette dernière possède une couleur de fond particulière.
J'ai trouvé ceci qui fonctionne niquel, mais il se contente d'effacer le contenu de la cellule qui à un fond jaune. J'aimerais pouvoir supprimer la ligne.
Merci beaucoup !
Edit : Et est-il possible de faire l'inverse aussi ? Supprimer les lignes ou il n'y a pas de cellule colorée ?
J'aimerais pouvoir supprimer une ligne si une cellule de cette dernière possède une couleur de fond particulière.
J'ai trouvé ceci qui fonctionne niquel, mais il se contente d'effacer le contenu de la cellule qui à un fond jaune. J'aimerais pouvoir supprimer la ligne.
Code:
Dim cell As Range
Range("A1:Z300").Select
For Each cell In Selection
If cell.Interior.ColorIndex = 6 Then
cell.ClearContents
Rows.Delete
End If
Next
Merci beaucoup !
Edit : Et est-il possible de faire l'inverse aussi ? Supprimer les lignes ou il n'y a pas de cellule colorée ?
Dernière édition: