As-t-on la possibilité de filtrer par couleur avec excel...?

[lapou]

dans l'idée j'ai 1000 lignes avec environ 200 en couleur, est-il possible de faire apparaitre uniquement ces lignes en couleur par un filtre ou autre ?

Merci d'avance ;-)

 

[@+Thierry]

Bonjour Lapou, le Forum

Tiens vu que tu fréquentes un peu ce Forum, tu devrais pourtant savoir qu'ici un petit Bonjour fait toujours plaisir...

Sinon un code comme ceci devrait faire ton affaire :

Sub ColorFilter()
Dim Cell As Range

Application.ScreenUpdating = False

For Each Cell In Range("A1:A1000")
If Cell.Interior.ColorIndex = xlNone Then
Rows(Cell.Row).Hidden = True
End If
Next

Application.ScreenUpdating = True
End Sub


Bon Après Midi
@+Thierry

 

[lapou]

Bonjour Thierry, le Forum ;-)

Excuse moi sincèrement pr le bonjour mais à vrai dire c'est un simple oublie car j'ai posté pas mal de mess depuis ce matin ;-)

Je vais essayer la macro ;-)

Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci Merci

@ + tard ;-)