lier étiquette de ligne a une liste déroulante

VBA
1

Bonjour

J’essaye de lier la ligne de mon TCD à une déroulante. En gros, je souhaite que lorsque je sélectionne une valeur de ma liste en H4.

la ligne de mon TCD se mette à jour avec la valeur sélectionnée.

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = Range(“H4”).Address Then

With ActiveSheet.PivotTables(“Tableau croisé dynamique1”).PivotFields(“H4”)

    .Orientation = xlRowField

    .Position = 1

ActiveWorkbook.RefreshAll

End If

End Subexemple.xlsm (16,8 Ko)

2

Bonjour!

Je ne suis pas sur d’avoir bien compris ta question.
Quels résultats t’attends tu à avoir en fonction des différentes valeurs dans ta liste déroulante?