Enchainer deux listes déroulantes filtrantes
Fermé
Klems29i
Messages postés
7
Date d'inscription
vendredi 22 juillet 2011
Statut
Membre
Dernière intervention
15 avril 2016
-
15 avril 2016 à 15:38
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 - 15 avril 2016 à 19:08
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 - 15 avril 2016 à 19:08
A voir également:
- Enchainer deux listes déroulantes filtrantes
- Deux comptes whatsapp - Guide
- Créer des listes déroulantes excel - Guide
- Deux ecran pc - Guide
- Excel listes déroulantes en cascade - Guide
- Itinéraire google map entre deux adresses - Guide
1 réponse
gbinforme
Messages postés
14946
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 684
15 avril 2016 à 19:08
15 avril 2016 à 19:08
Bonjour,
Sans le classeur, pas facile de tester mais ainsi cela devrait fonctionner :
Sans le classeur, pas facile de tester mais ainsi cela devrait fonctionner :
Private Sub Worksheet_Change(ByVal Target As Range) Dim Pvt As PivotTable If Target.Address = "$C$2" Or Target.Address = "$D$2" Then With Sheets("synthese") For Each Pvt In .PivotTables With Pvt.PivotFields("agence") .ClearAllFilters .CurrentPage = Range("$C$2").Value End With With Pvt.PivotFields("Ligne") .ClearAllFilters .CurrentPage = Range("$D$2").Value End With Next Pvt End With End If End Sub