IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Rafraichir un tableau croisé dynamique dans une feuille


Sujet :

Macros et VBA Excel

  1. #1
    Membre du Club
    Inscrit en
    Décembre 2004
    Messages
    111
    Détails du profil
    Informations forums :
    Inscription : Décembre 2004
    Messages : 111
    Points : 58
    Points
    58
    Par défaut Rafraichir un tableau croisé dynamique dans une feuille
    bonjour, j'aimerais rafraichir le tableau croisé dynamique sur une feuille au moment ou un utilisateur se pointe dessus....

    alors il faudrait mettre quoi dans mafeuille.activate :


    NB :
    j'ai déja vu une solution la mais elle rafraichit tout le classeur, cela ne me convient pas...

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Private Sub Worksheet_Activate()
       ThisWorkbook.RefreshAll
    End Sub

  2. #2
    Membre averti Avatar de J.Michel
    Inscrit en
    Septembre 2007
    Messages
    279
    Détails du profil
    Informations personnelles :
    Âge : 61

    Informations forums :
    Inscription : Septembre 2007
    Messages : 279
    Points : 323
    Points
    323
    Par défaut
    Peut être quelque chose comme ça (à approfondir)
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    Private Sub Worksheet_Activate()
       PivotTables(1).Refresh
    End Sub

  3. #3
    Expert éminent sénior

    Homme Profil pro
    Inscrit en
    Août 2005
    Messages
    3 317
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Secteur : Industrie

    Informations forums :
    Inscription : Août 2005
    Messages : 3 317
    Points : 20 144
    Points
    20 144
    Par défaut
    bonsoir


    En complément de J.Michel, tu dois spécifier la feuille:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    ActiveSheet.PivotTables(1).RefreshTable

    bonne soirée
    michel

  4. #4
    Membre éprouvé
    Avatar de JackOuYA
    Inscrit en
    Juin 2008
    Messages
    1 040
    Détails du profil
    Informations forums :
    Inscription : Juin 2008
    Messages : 1 040
    Points : 1 191
    Points
    1 191
    Par défaut
    Citation Envoyé par SilkyRoad Voir le message
    bonsoir


    En complément de J.Michel, tu dois spécifier la feuille:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    ActiveSheet.PivotTables(1).Refresh

    bonne soirée
    michel
    Bonsoir SilKy ...

    même dans l'action événementielle :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Private Sub Worksheet_Activate()
    ?

  5. #5
    Expert éminent sénior

    Homme Profil pro
    Inscrit en
    Août 2005
    Messages
    3 317
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Secteur : Industrie

    Informations forums :
    Inscription : Août 2005
    Messages : 3 317
    Points : 20 144
    Points
    20 144
    Par défaut
    rebonsoir


    Bonsoir SilKy ...
    même dans l'action événementielle :

    Code :
    Private Sub Worksheet_Activate()?
    Ouupps... effectivement ...
    j'étais persuadé que le pivottable devait systematiquement être précédé de l'objet "Worksheet" ... ;o)


    bonne soirée
    michel

  6. #6
    Membre du Club
    Inscrit en
    Décembre 2004
    Messages
    111
    Détails du profil
    Informations forums :
    Inscription : Décembre 2004
    Messages : 111
    Points : 58
    Points
    58
    Par défaut
    merci les amis... ceci clot le topic

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 1
    Dernier message: 18/03/2008, 16h05
  2. Réponses: 0
    Dernier message: 05/12/2007, 11h01
  3. Réponses: 1
    Dernier message: 19/02/2007, 19h18
  4. Réponses: 1
    Dernier message: 22/09/2006, 13h05

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo