Bonjours tout le monde,
J'essaie de lier un tableau croisé dynamique à une liste déroulante.
En somme, dès que l'on bouge la liste déroulante, par exemple, le nom d'une personne, le tableau mit dans une autre feuille change le nom qui est placé en haut, à droite du tableau.
Avec mes maigres compétences, je suis bloqué. J'en suis à tester deux codes qui ne fonctionnent pas...
ou
L'autre solution, c'est de mettre un bouton à côté, mais, avouez que c'est moins bien...
Merci d'avance.
Phyx
J'essaie de lier un tableau croisé dynamique à une liste déroulante.
En somme, dès que l'on bouge la liste déroulante, par exemple, le nom d'une personne, le tableau mit dans une autre feuille change le nom qui est placé en haut, à droite du tableau.
Avec mes maigres compétences, je suis bloqué. J'en suis à tester deux codes qui ne fonctionnent pas...
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "D1" Then
Sheets("TCD Heures").PivotTables("TCD heures").PivotFields("salarié").CurrentPage = _
Sheets("Fiche salarié").Range("D1").Value
End If
End Sub
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("D1").Value <> Target.Value Then
Sheets("TCD Heures").PivotTables("TCD heures").PivotFields("salarié").CurrentPage = _
Sheets("Fiche salarié").Range("D1").Value
End If
End Sub
L'autre solution, c'est de mettre un bouton à côté, mais, avouez que c'est moins bien...
Merci d'avance.
Phyx