[Résolu] Filtrer toutes les colonnes

[Lone-wolf]

Bonjour à tous,

Comment filtrer toutes les colonnes, sachant que ce n'est pas vraiment un tableau comme quand on le crée directement à partir d'Excel ?


Merci d'avance.

Note: pour afficher le tabeau sélectionnez la case à cocher, pour filtrer: sélectionnez la colonne "Commande n°"; pour réafficher: double-cliquez sur la cellule.



A+

 

[Fred0o]

Re : Filtrer toutes les colonnes

Bonjour Lonewolf,

Si j'ai bien tout compris, voici comment ré-écrire ta macro évènementielle :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Intersect(Target, [Tableau1]) Is Nothing Then Exit Sub
    With Range("Tableau1")
        .AutoFilter Field:=Target.Column - 1, Criteria1:=Target.Text
    End With
    CheckBox1.Value = False
End Sub

A+

 

[Lone-wolf]

Re : Filtrer toutes les colonnes

Bonjour Fred0o,

super, c'est nickel! . Merci beaucoup. Et merci d'avoir répondu.


A+

 

[Lone-wolf]

Re : Filtrer toutes les colonnes

Bonsoir à tous,

pour les interéssés, en PJ la nouvelle version du classeur.


Bonne soirée à tous.