Macro To Copy Resulting Cell To Word Document

[oli123]

Hi there, i am looking for some kind of macro that would allow me to copy partial/selected text data from my excel spreadsheet and transfer over to word. I am currently using a macro which copies the data on separate excel spreadsheet and I must then open word doc to paste the results. Im just wondering if there is an easier way to handle this?

Thnx,
Oli

 

[shadow12345]

This does will allow that, you need to make sure you set the reference library in VBA to have Microsoft Word object library as well!

Option Explicit

Sub Excel_to_Word()
Dim appWord As Word.Application

Set appWord = New Word.Application

appWord.Visible = True

selection.Copy

appWord.Documents.Add.Content.Paste

End Sub

Hope this helps.

 

[oli123]

This does will allow that, you need to make sure you set the reference library in VBA to have Microsoft Word object library as well!

Option Explicit

Sub Excel_to_Word()
Dim appWord As Word.Application

Set appWord = New Word.Application

appWord.Visible = True

selection.Copy

appWord.Documents.Add.Content.Paste

End Sub

Hope this helps.

Awesome, Thank you very much !