J'ai un problème pour la fin de mon programme.

Je dois écrire du texte sur Word et coller un graphique Excel.

Voilà ce que j'ai pu faire jusque là :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Dim appWord As Object
Dim doc As Object
Dim plage As Object
 
'ouverture d'un nouveau document Word affiché à l'écran
Set appWord = CreateObject("Word.application")
appWord.Visible = True
Set doc = appWord.Documents.Add
Set plage = doc.Range
Pour coller le graphique déjà copié avant, j'ai mis "plage.Paste" et ça marche. Le problème c'est que je n'arrive pas à écrire du texte sous le graphique sans que celui-ci ne disparaisse. En fait ce n'est que le dernier texte ajouté qui apparaît sur Word.
J'espère être assez clair.

J'aimerais donc coller mon graphe et mettre du texte en-dessous.

Merci d'avance

ps: c'est bien sur VB6 que je fais mon programme, ce n'est pas une macro.