Filtre par plusieurs couleur par VBA

Bonjour

j'aurai besoin d'aide

j'aurai aimé dans la colonne G de filtrer que les celulle Vert et rouge

par la fonction filtre on peut filtrer qu'une seul couleur moi je voudrais en selectionner 2 au minimun

c'est pour cela que j'aurai besoin d'une macro.

Merci à l'avance.

Edit modo : fichier supprime. Doublon

Bonjour

Un essai à tester. Te convient-il ?

Bye !

Bonjour cela fonctionne bien

merci

est il possible de prendre que entre G8 et G999

ne pas prendre en compte les lignes 8 premier lignes

bonjour GMB, olivcoco

peut-être comme ceci

Sub Couleurs_Meme_MFC()
     Dim UN    As Range, c

     't = Timer
     couleur1 = Range("A2").DisplayFormat.Interior.ColorIndex ' les couleurs (même s'ils sont modifié par MFC)
     couleur2 = Range("A4").DisplayFormat.Interior.ColorIndex

     With Range("G8:G999") 'cette plage
          For Each c In .Cells 'boucle les cellules
               Select Case c.DisplayFormat.Interior.ColorIndex 'couleur vrai (après MFC)
                    Case couleur1, couleur2 'couleurs à filtrer
                    Case Else:: Set UN = Union(IIf(UN Is Nothing, c, UN), c) 'les autres
               End Select
          Next

          .EntireRow.Hidden = False
          If Not UN Is Nothing Then UN.EntireRow.Hidden = True
     End With
     'MsgBox Timer - t
End Sub

Bonjour

Bonjour à tous

Nouvelle version

Bye !

bonsoir le fl,

2 méthodes qui utilisent la vraie couleur (après MFC) et presque instantanément

Bonjour

petite question vous masquez les lignes

est til possible dans le RAZ de remettre les lignes sans toucher aux colonnes qui sont masquées.

re,

si vous posez la question à moi, cela veut dire que vous utilisez déjà un autofiltre, qu'on ne peut pas désactiver.

La plage actuelle de cet autofilter, elle est quoi, (macro qui définit cette plage ou plage nommée >>> A8:Z1000 ????). Alors, plus tard, j'ajouterai une colonne auxiliaire pour le fonctionnement.

Bonjour

oui j'ai une macro qui me sert à masquer des colonnes

l 'ideal pour la macro qui sert a la couleur est de masquer que les lignes et ensuite si on appuie sur RAZ on remet toutes les lignes.

re,

on masque des colonnes ou des lignes d'une colonne ? je ne comprends pas votre remarque.

Bon, dans le PJ, je suppose que la plage pour votre autofilter était A8:Y1000 et j'y ajoute la colonne Z pour les couleurs, alors la plage est A8:Z1000. Avant de lancer la macro des couleurs, vous avez déjà appliqué un ou plusieurs filtres qui doivent rester. Vous voulez appliquer un autofiltre de couleurs sur les cellules visible.

Plus tard, vous voulez supprimer ce filtre de couleurs et respecter les autres filtres.

C'est ça ?

Bonjour

le filtre fonctionne tres bien et je vais laisser comme ca

c'etait le filtre RAZ mais c'est bon j'ai trouvé une solution

Sub RAZ()
'
    Call DESACTIVERPROTECTION  'macro pour desactiver la protection

    Rows("8:300").Select
    Selection.EntireRow.Hidden = False
    ActiveWindow.SmallScroll Down:=-24

     Call PROTECTION  'macro pour reactiver la protection

End Sub