Copie d'un graphique vers Word depuis un onglet précis Résolu

Question

Bonjour à tous, bonjour le forum,

J'ai un nouveau petit soucis pour une partie de mon code et je viens donc chercher votre aide précieuse... Je cherche à générer un rapport automatique après un lourd calcul Excel, jusque là tout va bien je mets des commentaires, un rapport type, des tableaux, etc mais au moment de copier les graphiques je bloque...

J'ai beaucoup cherché sur internet mais je n'ai pas trouvé chaussure à mon pied... Je cherche en fait à copier un graphique qui est dans le 13ème onglet de ma feuille Excel (Onglet "Synthèse") mais pas moyen de copier ce graphe... Je pense que je ne suis pas loin mais je n'y arrive pas... Voici le bout de code posant problème :

Worksheets("Synthèse").Activate
                        ActiveSheet.ChartObjects(13).Activate
                        ActiveChart.ChartArea.Select
                        ActiveChart.ChartArea.Copy
                        .TypeParagraph
                        .Paste

Merci pour votre aide !


Configuration: Windows / Chrome 41.0.2272.118

cs_Le Pivert · Answer

Bonjour,

après ce post, je croyais que tout fonctionnait:

https://forums.commentcamarche.net/forum/affich-31817808-copier-un-graphique-d-excel-dans-un-fichier-word#p31818589 

A tout hasard:

Vérifies en cliquant sur ton graph le nom qui est affiché dans la Barre de Formule. Et si cela correspond à 13!
Si ce n'est pas le cas mets ce qui est affiché, comme ceci par exemple:

ActiveSheet.ChartObjects("Mongraph").Activate

Guiboule1015 · Answer

Merci cs_Le Pivert, à présent tout fonctionne correctement. Je pense que j'avais un peu trop "la tête dans le guidon" et je ne trouvais pas la solution. Je tâcherai de prendre du recul les fois prochaines. Merci !

Copie d'un graphique vers Word depuis un onglet précis

2 réponses

Votre réponse