filtrer avec un lien hypertexte

[hicham28]

Bonsoir
j'espere avoir votre aide.
Voila un fichier exemple du travail que j'aimerai avoir.
je veux chaque fois que je clique sur une lettre (lettre A par exemple), un filtre sera appliquer sur la feuille 1 pour faire apparaître seulement les linges concernant la catégorie A.
Merci par avance de votre aide.

 

[Catrice]

Re : filtrer avec un lien hypertexte

Bonsoir,

voir l'exemple joint.

 

[hicham28]

Re : filtrer avec un lien hypertexte

merci c trop gentil, stp vous pouvez m'expliquer le code? merci

 

[Catrice]

Re : filtrer avec un lien hypertexte

Re,

J'ai remis le fichier dans le precedent post avec des commentaires.
N'hesite pas à revenir si ce n'est pas clair ...

Il y a du code dans Feuil2 et dans Module

 

[BERRACHED said]

Re : filtrer avec un lien hypertexte

Salut,Hicham,Catrice

Ajoute ça pour connaitre les sous totaux :

Sub Test(Arg1)
Sheets("Feuil1").Range("A1").AutoFilter Field:=1, Criteria1:=Arg1
MsgBox Application.Subtotal(9, [A:B])
Feuil2.Select
End Sub

Cordialement

 

[hicham28]

Re : filtrer avec un lien hypertexte

merci pour vos contributions,
si je change les lettres A,B,C.... par des mots, je dois changer quoi d'autre.
merci

 

[BERRACHED said]

Re : filtrer avec un lien hypertexte

Ré,

tu ne change rien le code repose sur le lien hypertexte est non sur le Texte

Cordialement

 

[hicham28]

Re : filtrer avec un lien hypertexte

merci, je fais changer que le texte dans les cellules de la feuille 2 et celle de la feuille 1, mais ca ne donne pas le resultat envisage du filtre.

 

[jafa]

Re : filtrer avec un lien hypertexte

Bonjour hicham28 et le forum

Il y a plus simple en utilisant Somme.si

formule simple souple et tu as tes résultats.

à+

jafa

 

[Catrice]

Re : filtrer avec un lien hypertexte

Bonjour,

Le code proposé utilisait le nom du lien hypertexte
Utilise plutot :
Test Target.TextToDisplay

TextToDisplay correspond au texte à afficher.
Donc si tu changes le texte dans la cellule c'est celui-ci qui sera pris en compte pour le filtre

 

[hicham28]

Re : filtrer avec un lien hypertexte

je vous remercie de votre aide, merci