Macro qui colle une image dans Paint
Bonjour,
je cherche à faire une macro qui colle un graphique dans Paint et l'enregistre. J'ai déjà réussi à ouvrir paint (première étape), mais ensuite, il faut réussir à atteindre les commandes de paint à partir de code VBA et c'est là que ça se gate. Voici mon code :
Code:
1 2 3 4 5 6 7
| Sub ouvrirPaintDepuisExcel()
Dim Paint
Paint = Shell("C:\WINNT\system32\mspaint.exe")
Sheets("BRIC 2009").Select
ActiveChart.ChartArea.Copy
Paint.Selection.Paste
End Sub |
Le problème est que "Paint" n'est pas un objet. Il n'y a donc pas moyen d'atteindre des propriétés ou des méthodes. Quelqu'un saurait comment il faut faire ? Sinon, si vous connaissez un tutoriel qui pourrait m'aider, je suis preneur.
Je vous remercie par avance.