Bonjour,
Depuis ce matin , je me heurte à un problème qui m'empêche d'avancer dans mon travail.
Je vais essayer d'etre simple
Dans un fichier Excel, j'ai plusieurs feuilles dont:
- la feuille ("TMJ") où j'ai un tableau de données (I2 à L481).
- la feuille ("Nom_PPDC") où j'ai crée un TCD( "TCD_Nbr_PPDC") issu de ce tableau.
De ce tableau TCD, je récupère des données que j'insère dans un autre tableau (par un simple copier/coller).
Mon soucis, c'est que le tableau de donnees de la feuille "TMJ" est dynamique. Ces données changent assez frequemment au cours de la journée.
Ce que j'essaie de faire en vain, c'est de creer un petit code evenementiel qui , a chaque fois que les données du tableau (I2 à L481) changent, mon TCD issu de ce tableau se réactualise automatiquement .
J'ai inseré le code évenementiel ci-dessous dans la feuille "TMJ" mais rien ne se passe. :
Merci de votre aide
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Worksheets("TMJ").Range("I2:L481")) Is Nothing Then Worksheets("Nom_PPDC").PivotTables("TCD_Nbr_PPDC").RefreshTable End If End Sub
Partager