Bonjour,
Dans le cadre d'un projet, j'ai besoin d'ajouter un chart (statistique) durant le diaporama (pour après le mettre à jour chaque seconde).
J'ai très bien réussi à utiliser la méthode AddChart dans une macro en mode hors diapo :
Mais aucun moyen de faire fonctionner ça durant un diaporama. L'erreur est :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Dim oSl As PowerPoint.Slide Dim oSh As PowerPoint.Shape Dim numSlide As Integer numSlide = ActiveWindow.View.Slide.SlideIndex 'Selection de la slide parcourue Set oSl = ActivePresentation.Slides(numSlide) 'Création du graph Set oSh = oSl.Shapes.AddChart(xl3DPie, 220, 150, 550, 350)
"Erreur d'exécution '-2147467259 (80004005)': La méthode 'AddChart' de l'objet 'Shapes' a échoué"
Le pire, c'est que si dans la macro j'active la fenêtre powerpoint juste avant la fonction et ré-active le diapo juste après, cela fonctionne, mais pour une présentation professionnelle je ne peux pas laisser le fait que l'on voye le diapo quitter puis revenir.
De plus, l'ajout d'autres shapes comme addTextBox ou AddPicture fonctionne durant le diaporama ...
Avez vous une idée ou est-ce un bug ?
Merci,
Julien
Partager