Bonjour le forum.
Comme si bien dit dans le titre, je cherche a copier un graphe depuis Excel dans Word en pilotage word.
Voici mon code et ça fait quelque temps que je bloque dessus en cherchant sur internet avec acharnement mais pas moyen de trouver comment faire :
Il arrive a retrouver le graphe que je veux, ça, ça marche. Mais impossible de le copier / coller à la suite de mon texte dans mon document.
Comme si bien dit dans le titre, je cherche a copier un graphe depuis Excel dans Word en pilotage word.
Voici mon code et ça fait quelque temps que je bloque dessus en cherchant sur internet avec acharnement mais pas moyen de trouver comment faire :
Il arrive a retrouver le graphe que je veux, ça, ça marche. Mais impossible de le copier / coller à la suite de mon texte dans mon document.
VB:
'Ajouter graphe 1 : Utilisation par semaine
For i = Feuille.ChartObjects.Count To 1 Step -1
Feuille.ChartObjects(i).Activate
If ActiveChart.ChartTitle.Text = Feuille.Name & " Utilisation par semaine" Then
With Feuille.ChartObjects(i)
.CopyPicture
End With
WordDoc.Paragraphs.Add
WordDoc.Paragraphs(WordDoc.Paragraphs.Count).Range.Select
Selection.Paste
DoEvents
Exit For
End If
Next i