VBA tableau croisé dynamique: erreur pivotite Fermé

Question

Bonjour j'ai un bug avec une de mes macros et j'arrive pas à comprenre pourquoi  J'ai trois feuilles dans mon classeur.La première contient un tableau de donnéesLa seconde contient trois labels qui quand on clique dessus renvoie vers la troisième feuille qui contient mon tableau croisé dynamique.Suivant le lable (représente un hôpital) sur lequel on clique le tableau affiche les informations en rapprort avec le label cliqué.Juste que là ca marche.Voilà mon problème:L'utilisateur clique sur un label par exemple label1 (=hôpital A) le tableau s'affiche, avec les données pour l'hôpital A. L'utilisateur à partir du tableau croisé dynamique peut très bien décidé d'afficher d'autres hôpitaux (à fin de faire des comparaisons) en cliquant sur l'en tête "Institution"de la colonne du tableau croisé et en cochant les hôpitaux désirés. A partir de là si l'utilisateur décoche l'hôpital sélectionné à la base au moyen du label (dans ce cas ci hôpital A), qu'il retourne à la deuième feuille et qu'il clique sur le label2, le programme plante tandis que si il reclique sur le label1 ca marche!!!Au cas où vous auriez pas tout compris.http://users.skynet.be/bigjasps/Copie_de_PDM.xlsMerci d'avance à celui qui pourra m'expliquer ce mystère

Armojax · Answer

Hello cooldidi,Il me semble que l'origine de l'erreur se situe dans ta boucle :For i = 2 To nombre  .PivotItems(i).Visible = FalseNext iDans le cas que tu signales, tu tombes sur le cas où tous tes PivotItems seraient invisibles. Or il doit y en avoir toujours au moins un.Peut-être me gourre-je, mais je pense que c'est une bonne piste.Ajx.

VBA tableau croisé dynamique: erreur pivotite

1 réponse

Discussions similaires