Demha_2022
XLDnaute Nouveau
Bonjour,
J'ai un fichier excel dont une de ses feuilles contient le TCD , j'importe quotidiennement des données dans cette feuille , ensuite je me réffère de ces données pour créer un TCD (Tableau Croisé Dynamique).
Ce que je souhaiterais c'est de mettre automatiquement le TCD à jour ou l'actualiser à chaque fois que j'importerai de nouvelles dans cette feuille.
J'ai fait appel à la macro VBA pour actualiser mon TCD , mais il me semble que j'ai un problème dans ma macro que j'ai fait , la macro s'exécute ligne par ligne sans aucun souci sauf que les données du TCD ne se mettent pas à jour ou ne s'actualise pas à chaque fois qu'il ya de nouvelle données que je colle dans la feuille qui contient le TCD
Voici mon code
Quelqu'un aurait svp une idée ou un astuce pour me passer afin de résoudre ce problème d'actualisation du TCD ?
Je compte sur votre bonne compréhension et sur votre lumière
J'ai un fichier excel dont une de ses feuilles contient le TCD , j'importe quotidiennement des données dans cette feuille , ensuite je me réffère de ces données pour créer un TCD (Tableau Croisé Dynamique).
Ce que je souhaiterais c'est de mettre automatiquement le TCD à jour ou l'actualiser à chaque fois que j'importerai de nouvelles dans cette feuille.
J'ai fait appel à la macro VBA pour actualiser mon TCD , mais il me semble que j'ai un problème dans ma macro que j'ai fait , la macro s'exécute ligne par ligne sans aucun souci sauf que les données du TCD ne se mettent pas à jour ou ne s'actualise pas à chaque fois qu'il ya de nouvelle données que je colle dans la feuille qui contient le TCD
Voici mon code
VB:
Public Sub raffraichissement_TCD()
' raffraichir ou actualiser le TCD
Dim mypivot As PivotTable
Dim ws As Worksheet
Set ws = Sheets("Feuil5")
'ws.Activate
For Each mypivot In Sheets("Feuil5").PivotTables
If mypivot.Name = "mon tableau croisé dynamique" Then
mypivot.RefreshTable
mypivot.PivotCache.Refresh
End If
Next mypivot
ws.Activate
Range("BD8").Select
'ActiveWorkbook.RefreshAll
End SubQuelqu'un aurait svp une idée ou un astuce pour me passer afin de résoudre ce problème d'actualisation du TCD ?
Je compte sur votre bonne compréhension et sur votre lumière