Discussion :

[le-guedin]

Bonjourà tous
Actuellement j'ai réussi a faire tout ce que je devais réaliser, mais j'ai constaté un bug.

Je possède 5 onglets sur un classeur
Le 1er au moment de l'ouverture de l'onglet il affiche un userform avec un filtre, celui ci cherche les données sur une table

une fois que je valide mon filtre il me revoie sur l'onglet prévu en filtrant le tableau

mais mon soucis vient maintenant, j'ai un bouton pour pouvoir encore effectuer un filtre sur les lignes restante or il inclus les lignes cacher

donc je suis entrains de chercher pour trouver une solution

Merci de votre aide

[enernaej]

Bonjour,

Il y a plusieurs problèmes dans votre application :

1) comme lbdata est une listbox à sélection multiple,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.lbData.Text

ne retourne rien. Il faut tester :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.lbData.Selected(index)

avec index variant entre 0 et Me.lbData.ListCount - 1.

2) avec votre filtre,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

DataSource.AutoFilter field:=Label, Criteria1:=Crit, Operator:=xlFilterValues, Criteria2:=Crit

il y a deux problèmes. Vous utilisez la même valeur et le critère xlFilterValues.
Avec la méthode Autofilter, vous ne pouvez filtrer que sur deux valeurs Criteria1 et Criteria2 et avec xlOr vous faites un "Opérateur logique OR Criteria1 ou Criteria2" comme indiqué dans l'aide.

Avec ces modifications vous avez un tableau filtré selon 1 critère et avec deux valeurs possibles.

Cordialement.

[le-guedin]

bonjour
merci de vos réponse j'ai donc changer certain paramètre :

au niveau du bouton pour lancer le filtre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 Dim Elem As Byte, txt As String
    For Elem = 0 To lbData.ListCount - 1
        If lbData.Selected(Elem) = True Then
        End If
    Next

et j'ai crée un module supplémentaire pour effectuer le filtre comme il faut

par contre pour ajouter un symbole à une ligne qui est filtré et donc non cacher pour que lorsque je souhaite à nouveau lancer le filtre sur le reste des lignes restantes il charge uniquement les lignes avec le sympbole la je galère encore