Afficher des lignes en fonction d'une liste déroulante
Bonjour Patrick,
Je viens de m'apercevoir que votre solution ne me convient pas.
Effectivement, j'ai sur mon fichier d'autres colonnes à droites de celles concernant l'employé qui sont remplies manuellement.
Seule celle de Jean-Eric me convient car cette méthode masque les lignes non concernés, les infos sur les colonnes de droite vont donc "suivre" l'agent qu'elles concernent.
Or je n'arrive pour le moment pas à la mettre en place ...
Merci beaucoup tout de même.
Bonjour Jean-Eric,
Dans la macro, que faut-il modifier pour pouvoir l'adapter à mon fichier ? J'ai modifié le "BD" par le nom de ma feuille. Pour le reste je ne sais pas exactement comment la rendre utilisable sur mon fichier.
VBA me lance le message suivant :
Erreur d'exécution '9':
L'indice n'appartient pas à la sélection.
Merci beaucoup !
En fonction de ce que je sélectionne dans le segment, j'ai bien marqué VRAI ou FAUX dans la cellule correspondante.
Cependant, quand j'ai marqué FAUX, la cellule ne se masque pas pour autant. C'est donc un problème dans la macro je pense.
Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
Dim tbl As ListObject, lCol As Long
Application.ScreenUpdating = False
Set tbl = Worksheets("BD 2").ListObjects("Tableau2")
lCol = tbl.ListColumns("Filtre").Index
With tbl
If .AutoFilter.FilterMode Then .AutoFilter.ShowAllData
.Range.AutoFilter Field:=lCol, Criteria1:="VRAI"
End With
Application.ScreenUpdating = True
Set tbl = Nothing
End Sub
J'ai bien mis la macro précédente dans l'onglet ou j'ai le TCD.
J'ai modifié le nom des 2 premiers éléments soulignés en mettant bien le nom de ma feuille et le nom de ma BD.
J'ai bien nommé l'en-tête de colonne avec les VRAI ou FAUX "Filtre".
Cependant l'erreur 9 intervient toujours.
Ya t-il d'autres éléments que je dois modifier ?
Merci.
RE,
Les VRAI ou FAUX sont issus d'une formule et il ne pas y toucher.
Cdlt.
Bonjour Jean-Eric.
Je sais qu'il ne faut pas y toucher, je l'ai juste adapter en modifiant les 2 premiers critères de la fonction EQUIV. près je n'y touche plus.
Cette fonction fonctionne correctement car "VRAI" ou "FAUX" apparaît bien en fonction de ma sélection dans le segment.
Le problème concerne la macro : elle ne masque pas les cellules pour lesquelles il y a marqué "FAUX".
Merci de m'aider.
Bonjour,
Envoie ton fichier modifié.
Cdlt.
Bonjour,
Merci à tous pour votre aide.
Je vais probablement utiliser les segments que j'ai enfin réussi à mettre en place.
Je clôture.
Bonne continuation !
Bonjour,
Reviens vers nous quand tu le souhaites.
Bonnes fêtes de fin d'année.
Cdlt.