I wish to make an excel makro which append a chart to open word file.
(format as picture). Then it returns to excel. It would be useful
also to clear the clipboard after this.



I succeded to make makro which transfer chart to clipboard and then
make word as active.

In Tools - references I also assign Microsoft word 10.0 Object
library.

This macro is:

Sub Makro2()
'
Dim exc As Excel.Workbook, wor As Word.Application
ActiveChart.ChartArea.Copy
Set wor = GetObject(, "word.application")
wor.Visible = True
wor.Activate
End Sub

I please for macro, which will copy this chart to open word document.

Regards and thank for help
Jani