Autres Filtre automatique

Moran

XLDnaute Nouveau
Bonjour à tous !

J'ai de nouveau besoin de votre aide...je n'arrive pas à obtenir le résultat que je souhaite.

Je voudrais que le tableau soit filtrer automatiquement en fonction du mot que j'indique en F1 (que les lignes ne correspondant pas à la recherche soient masquées).
Et que ce filtre s'opère dès que le mot recherché apparait dans la colonne B.

Merci pour votre aide !
 

Pièces jointes

  • CPV.xlsm
    306.3 KB · Affichages: 4
Solution
Bonjour,

Dans le module de code de la feuille vous trouverez la macro suivante qui filtre votre tableau dont les lignes de B contiennent le mot de $F$1. La macro supprime les filtres lorsque $F$1 est vide.

VB:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$F$1" Then

        With Range("A1").CurrentRegion
            .AutoFilter
            If Target.Text <> "" Then
                .Range("$A$1:$B$9455").AutoFilter Field:=2, _
                                                  Criteria1:="=*" & Target & "*", _
                                                  Operator:=xlAnd
            End If
        End With
    End If
End Sub

Cordialement

Hasco

XLDnaute Barbatruc
Bonjour,

Dans le module de code de la feuille vous trouverez la macro suivante qui filtre votre tableau dont les lignes de B contiennent le mot de $F$1. La macro supprime les filtres lorsque $F$1 est vide.

VB:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$F$1" Then

        With Range("A1").CurrentRegion
            .AutoFilter
            If Target.Text <> "" Then
                .Range("$A$1:$B$9455").AutoFilter Field:=2, _
                                                  Criteria1:="=*" & Target & "*", _
                                                  Operator:=xlAnd
            End If
        End With
    End If
End Sub

Cordialement
 

Pièces jointes

  • CPV.xlsm
    313.6 KB · Affichages: 4

Discussions similaires

  • Résolu(e)
Autres Excel
Réponses
18
Affichages
273

Statistiques des forums

Discussions
299 878
Messages
1 979 751
Membres
206 857
dernier inscrit
Pageee