IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Tooglebutton pour filtrer


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Nouveau candidat au Club
    Femme Profil pro
    Étudiant
    Inscrit en
    Juillet 2015
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Indre et Loire (Centre)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Juillet 2015
    Messages : 2
    Par défaut Tooglebutton pour filtrer
    Bonjour,

    Je souhaiterais additionner 2 filtres sur une seule colonne, malheureusement quand je clique sur le premier toogle et ensuite sur le deuxième, il ne me prend en compte que le filtre du deuxième.

    Voici le code :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    Private Sub Sans_L_Click()
     
    If Sans_L.Value = True Then
        ActiveSheet.Range("$A$1:$L$327").AutoFilter Field:=2, Criteria1:="<>*L*", _
            Operator:=xlAnd
        Sans_L.BackColor = &HFF00& 'Vert
    Else
        ActiveSheet.Range("$A$1:$O$484").AutoFilter Field:=2
        Sans_L.BackColor = &HFF& 'Rouge
    End If
     
    End Sub
     
    Private Sub Sans_T_Click()
     
    If Sans_T.Value = True Then
        ActiveSheet.Range("$A$1:$L$327").AutoFilter Field:=2, Criteria1:="<>*T*", _
            Operator:=xlAnd
        Sans_T.BackColor = &HFF00& 'Vert
    Else
        ActiveSheet.Range("$A$1:$O$484").AutoFilter Field:=2
        Sans_T.BackColor = &HFF& 'Rouge
    End If
     
    End Sub
    De plus je souhaiterais modifier cette ligne : ActiveSheet.Range("$A$1:$O$484").AutoFilter Field:=2.
    Afin qu'elle n'annule que l'action concernant son bouton et pas celle des autres.

    Je ne sais pas si j'ai était très claire. Pour plus de précisions n'hésitez pas à demander.

    Merci d'avance

    Marine

  2. #2
    Expert confirmé
    Homme Profil pro
    aucune
    Inscrit en
    Septembre 2011
    Messages
    8 208
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : aucune

    Informations forums :
    Inscription : Septembre 2011
    Messages : 8 208
    Par défaut
    Bonjour,

    Je souhaiterais additionner 2 filtres sur une seule colonne, malheureusement quand je clique sur le premier toogle et ensuite sur le deuxième, il ne me prend en compte que le filtre du deuxième.
    Pour autant que comprenne, c'est le propre des boutons bascule (comme un interrupteur). Est-ce que tu peux détailler ce que tu souhaites faire ?

  3. #3
    Nouveau candidat au Club
    Femme Profil pro
    Étudiant
    Inscrit en
    Juillet 2015
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Indre et Loire (Centre)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Juillet 2015
    Messages : 2
    Par défaut
    Bonjour,

    Je souhaite trier une colonne sur laquelle j'ai des lettres correspondant à une forme ( L, T, R, ...)
    J'ai créé un userform sur lequel j'ai mis des tooglebutton (bouton pressoir) avec le code que j'ai déja donné.
    Lorsque je clique sur le premier ( le "Sans_L" par exemple ) le filtre m'enleve tous les L ( jusque là pas de problème ). Mon premier problème apparait lorsque je souhaite combiner les filtres : si je clique sur le "bouton sans_T" le filtre va m'enlever tous les T mais remettre les L !
    Mon second problème c'est lorsque je désenclenche un bouton cela équivaut à un "select all" dans un filtre normal, or je souhaiterai uniquement que cela annule l'action précédente (càd remettre la lettre qui avait été enlevée).
    J'espere que j'ai réussie à etre plus claire !

    Cordialement

    Marine

  4. #4
    Inactif  

    Homme Profil pro
    Développeur .NET
    Inscrit en
    Janvier 2012
    Messages
    4 903
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : Canada

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : Finance

    Informations forums :
    Inscription : Janvier 2012
    Messages : 4 903
    Billets dans le blog
    36
    Par défaut
    Bonjour,

    À première vue, tu devrais utiliser un Filtre avancé. Contrairement au filtre simple, on peut combiner des conditions.

    Pour plus d'informations, tu peux aller voir là.

Discussions similaires

  1. [XSLT]Expression régulière pour filtrer le contenu d'un noeud
    Par Matthieu Brucher dans le forum XSL/XSLT/XPATH
    Réponses: 4
    Dernier message: 17/10/2006, 15h35
  2. Requête à modifier pour filtrer.
    Par dest dans le forum Requêtes
    Réponses: 3
    Dernier message: 12/10/2006, 23h07
  3. [C#] méthodes pour filtrer un datagridview ?
    Par tikam dans le forum Windows Forms
    Réponses: 3
    Dernier message: 16/08/2006, 12h24
  4. Instruction SQL dans un bouton pour filtrer info formulaire
    Par beegees dans le forum Requêtes et SQL.
    Réponses: 6
    Dernier message: 05/09/2005, 13h26
  5. Grep pour filtrer le fichier log
    Par devdev2003 dans le forum Shell et commandes GNU
    Réponses: 2
    Dernier message: 23/02/2005, 05h48

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo