XL 2016 Actualiser les graphiques d'un Powerpoint

  • Initiateur de la discussion Initiateur de la discussion ArtoriaPendragon
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

A

ArtoriaPendragon

Guest
Bonjour à tous, et merci par avance de votre aide:

Je dispose d'un fichier excel comportant des graphiques que j'ai exporté vers un powerpoint (en pensant à lier les données)
lorsque je modifie mes données, les graphiques qui sont sur excel et powerpoint se modifient sans problèmes
Par contre, une fois que j'ai fermé le logiciel powerpoint et que je réouvre mon fichier powerpoint, et que je réitère l'opération, les graphiques powerpoint ne s'actualise plus (et je dois moi même pour chaque graphique "actualiser les données", mais mon powerpoint contient moult et moult graphiques.)
Pouvez vous m'aider à résoudre ce problème ?

Malgré avoir recherché sur ce forum, je n'ai rien trouvé qui puisse m'aider.
 
Bonjour et bienvenue,

C'est un sujet plutôt à traiter ici.

Mais en attendant mieux, car je ne suis pas spécialiste du vba powerpoint, vous pouvez ajouter cette macro dans votre powerpoint.
Elle mettra à jour les graphiques liés.
VB:
Sub MiseAJoursGraphiques()
    Dim sld As Slide
    Dim sh As Shape
    For Each sld In ActivePresentation.Slides
        For Each sh In sld.Shapes
            If sh.HasChart Then
                If sh.Chart.ChartData.IsLinked Then sh.LinkFormat.Update
            End If
        Next
    Next
End Sub
et la lancer soit par click sur un bouton soit par ALT+F8 etc..

Bonne soirée
 
Bonjour et bienvenue,

C'est un sujet plutôt à traiter ici.

Mais en attendant mieux, car je ne suis pas spécialiste du vba powerpoint, vous pouvez ajouter cette macro dans votre powerpoint.
Elle mettra à jour les graphiques liés.
VB:
Sub MiseAJoursGraphiques()
    Dim sld As Slide
    Dim sh As Shape
    For Each sld In ActivePresentation.Slides
        For Each sh In sld.Shapes
            If sh.HasChart Then
                If sh.Chart.ChartData.IsLinked Then sh.LinkFormat.Update
            End If
        Next
    Next
End Sub
et la lancer soit par click sur un bouton soit par ALT+F8 etc..

Bonne soirée

Bonjour, merci beaucoup de votre réponse, cela m'aide beaucoup, c'est complètement ce qu'il me fallait !
Je suis novice sur ce forum, mais à l'avenir, je ferai des efforts quant à la recherche du bon forum.
Merci beaucoup de m'avoir répondu même si ce sujet était mal placé !
Bonne semaine à vous Roblochon
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

C
  • Résolu(e)
Réponses
2
Affichages
810
Cassandre16
C
Réponses
13
Affichages
2 K
D
  • Question Question
Réponses
2
Affichages
803
David1902
D
F
Réponses
14
Affichages
3 K
FLEBY
F
E
  • Question Question
Réponses
1
Affichages
3 K
Ericfourm
E
F
Réponses
0
Affichages
2 K
frederique delavaud
F
C
Réponses
0
Affichages
1 K
C
Retour