DDEPoke - paste picture

Jeg skal kopier fra Excel over i Word. Er det mulig på en eller ande måde ente at kopier en tabel i billede format eller at indsætte i billede format.

Dim channelNumber As Long
Dim Pokerange As Object

channelNumber = Application.DDEInitiate( _
    app:="WinWord", _
    topic:="C:\test.DOC")
Set RangeToPoke = Worksheets("Output-Word").Range("a2:u8")
Application.DDEPoke channelNumber, "\StartOfDoc", RangeToPoke