Filtre auto

MicDHL · 28 Avril 2009

Bonjour à tous

Quelqu'un aurait-il la solution à mon problème.

Je souhaiterais qu' as coté de choix je selectionne un code par menu déroulant et qu'automatiquement se filtre la colonne A par rapport à ce choix.

Merci d'avance de votre aide précieuse.

mth · 28 Avril 2009

Re : Filtre auto

Bonjour Micdhl,

ci-joint un essai avec ce code dans Feuil1

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$J$1" Then
        If Target = "(Tous)" Then
            Selection.AutoFilter Field:=1
        Else
            Selection.AutoFilter Field:=1, Criteria1:=Target.Text
        End If
    End If
End Sub

ceci dit ... on peut avoir exactement la même chose en filtrant directement sur la colonne A, pas compris l'intérêt d'en rajouter une couche avec la liste déroulante ... mais bon...

Bonne journée,

mth

MicDHL · 28 Avril 2009

Re : Filtre auto

Merci Beaucoup

Pour infos, le choix du filtre se feras en automatique dans un onglet de collage.

Enfin c'est ce qui est prévue, reste à essayer
A bientôt

Filtre auto

MicDHL

XLDnaute Nouveau

Pièces jointes

mth

XLDnaute Barbatruc

Pièces jointes

MicDHL

XLDnaute Nouveau

Discussions similaires

Filtre auto

MicDHL

XLDnaute Nouveau

Pièces jointes

mth

XLDnaute Barbatruc

Pièces jointes

MicDHL

XLDnaute Nouveau

Discussions similaires

Privacy & Transparency

Privacy & Transparency