Recherche de filtre

Bonjour à tous,

J'aimerais sortir le nom (par exemple en haut de page) d'un filtre (d'une colonne spécifique) que j'effectue.

Y a-t-il un moyen ?

En résumé, j'ai plusieurs noms de "départements" dans une colonne (Acier, Alu, Usinage, etc...). Lorsque je fais un filtre "Alu", toutes mes pièces alu sortent. J'aimerais donc que le département "Alu" sortent en haut de page et cela automatiquement.

Merci de vos réponses

Bonjour,

Avec un filtre élaboré,

envoie le fichier pour régler la macro. (structure réelle)

Amicalement

Claude

Bonjour,

Voilà mon fichier joint. La colonne à filtrer est la M et je voudrais mettre le nom de ce que je filtre en haut à droite à la place du "Département".

Salutations

-- 18 Avr 2011, 11:38 --

(RE),

J'ai fais un petit fichier. L'autre ne passe pas (trop volumimeux).

re,

ici, on filtre sur place, mais on pourrait extraire sur une autre feuille,

c'est pas un bonne idée d'extraire en haut de la même feuille,

tu risque d'être gêné par les lignes de la base.

à voir sur un fichier + représentatif

Claude

Hello,

Oui cela marcherais pas mal du tout. Peux-tu m'expliquer comment tu as fais ?

Merci infiniment,

Cordialement,

Julien

re,

Clique droit sur l'onglet, Visualiser le code

épluche aussi l'aide en ligne (touche F1)

sur les filtres élaborés ou avancés

Bonne journée

Claude

Je ne trouve pas où visualiser le code? (je débute en macro...) Merci bien quand même ^^

Bonsoir,

tu clique droit sur l'onglet,

dans la liste proposée, sélectionne "Visualiser le code", çà t'amène ici

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Target, Range("c3")) Is Nothing Then
        Application.ScreenUpdating = False
            On Error Resume Next
                ActiveSheet.ShowAllData
            On Error GoTo 0
        If Target.Count > 1 Then Exit Sub
        Range("c5:f" & [c65000].End(xlUp).Row).AdvancedFilter Action:=xlFilterInPlace, _
        CriteriaRange:=Range("c2:c3"), Unique:=False

        Application.Goto Range("a1"), Scroll:=True
        Target.Activate
    End If
End Sub

Amicalement

Claude

Hello,

Après un moment d'absence, je revient en force!

Oui cela marche bien, en effet ! Merci. Cependant, j'ai de la peine à comprendre le code et à le modifier. Si tu as un moment, peux tu m'expliquer ces termes?

Et au lieu d'avoir une liste de base, est-il possible de concevoir une liste automatique des valeurs que l'on a a trié? Car de temps à autre je dois trier mes colonnes, par exemple, par épaisseur. De là, je n'ai pas une liste de base pour les épaisseur J'espère que tu me comprend.

Et est-ce possible de faire cela sur plusieurs colonnes côte à côte?

Merci infiniment, Julien

Bonsoir,

Envoie ton fichier avec sa structure réelle,

si trop gros, compresse-le ou supprime des lignes

Peu pas mieux te dire !

Amicalement

Claude

Hello,

Voilà donc mon fichier, plus petit format.

Ce qu'il se passe, c'est que maintenant, nous avons des tris à la ligne 12, qui marchent très bien. Cependant, nous aimerions que l'on puisse visualiser ce que l'on a trié à la ligne 9.

De ce fait, avoir plusieurs tris élaborés à la ligne 9 qui reprennent tous les termes de la colonne.

Je te laisse regarder de plus près.

Salutations et merci.

Cucu

Bonjour à tous,

Une approche de BDD avec filtre élaboré

Normalement, on ne met jamais de listes déroulantes dans une base de données,

il faut prévoir une feuille de saisie pour entrer des nouveaux articles.

Tu remarqueras que ton fichier de 350 Ko (ce qui est gros pour un xlsm) est descendu à 33 Ko

c'était à cause des listes mal placées.

à voir pour suite à donner

Amicalement

Claude

édit:

erreur formule de ma part en F10 et G10

copie la formule de C10

Ouais sa commence à donner quelque chose

Ce serait parfait si on avait des listes de choix dans la zone de critères. Est-ce possible?

Si non c'est déjà cool, merci de ta participation.

Salutations, Julien

re,

Tu peux mettre des listes, pas sûr que se soit + pratique !

Le tout est de savoir ce que tu recherche

une liste de + de 20 lignes devient vite indigeste !

fais l'essai avec liste "Matière"

Claude

Ce serait quand même assez pratique de mettre des listes.

Mais Comment peut-on faire pour les insérer, qu'elles reprennent les noms de dessous (une seule fois, pas de doublons) ? Et lorsque j'insère ces listes, je leurs dis de prendre tous le snoms ci-dessous. Mais lorsque j'ai une liste beaucoup plus grande, dois-je refaire une sélection des zones, ou existe-il une macro permettant de prendre seulement les cases remplies?

Cordialement,

Cucu