J
Jani
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
(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