Bonjour à tous,

Je ne suis pas une spécialiste du développement mais c'est un domaine qui m'intéresse et dernièrement à titre perso on m'a demandé si je pouvais automatiser la saisie de bons afin d'avoir un suivi des stocks et des clients, je me suis donc lancé dans la création d'un fichier excel sur la base de formulaires et de tableaux de croisés dynamiques.
L’ensemble de mon VBA semble fonctionner, mais vue la complexité de mon tableau de données (feuille "SUIVI DES ENTREES & SORTIES") je n'arrive pas à créer des TCD en direct, j'ai donc décidé de passer par des requêtes mais je rencontre des problèmes dans leur actualisation, c'est pourquoi je m'adresse à vous.

Vous trouverez ci-joint le fichier en question dans lequel j'ai retiré les infos perso pour pouvoir le poster en public mais si une personne souhaite l'avoir en version officielle je peux le faire passer en privé.

Je ne suis pas sûre que le problème vienne du code puisque même en direct sur le fichier lorsque je fais actualiser tout ça à l'air de charger mais rien ne change.


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Sub Actualisation_des_tableaux()
 
' Actualisation requêtes
 
    ActiveWorkbook.Connections("Requête*-*Tableau4").Refresh
    ActiveWorkbook.Connections("Requête*-*Tableau49").Refresh
    ActiveWorkbook.Connections("Requête*-*Append1").Refresh
 
' ActualisationTCD Macro
 
    ActiveWorkbook.Worksheets("SYNTHESE STOCKAGE").PivotTables("Tableau croisé dynamique4").PivotCache.Refresh
    ActiveWorkbook.Worksheets("SYNTHESE TIERS STOCKAGE").PivotTables("Tableau croisé dynamique3").PivotCache.Refresh
 
 
End Sub
Merci d'avance pour votre aide.