How to use CopyBitmapToClipboard on a Linked object?

[#1]

Hello,

I have a document with 2 sheets. I have linked a chart from the 1st sheet onto the 2nd sheet. When I try to run the macro

below from a button on the 2nd sheet, I get the following error:

Shapes.Paste : Invalid request.  Clipboard is empty or contains data which may not be pasted here.

''***********Create Powperpoint Report******************
sub To_Powerpoint

Set PPApp = CreateObject("Powerpoint.Application") 
PPApp.Visible = True
Set PPPres = PPApp.Presentations.Add

Set PPSlide = PPPres.Slides.Add(1, 1)
ppApp.ActiveWindow.View.GotoSlide 1
PPSlide.Shapes(1).Delete ' removes the title
PPSlide.Shapes(1).Delete ' removes the subtitle

ActiveDocument.GetSheetObject("CH16").CopyBitmapToClipboard
PPSlide.Shapes.Paste.Select

PPPres.SaveAs "C:\temp\Report.pptx"   

Set PPSlide = Nothing  
Set PPPres = Nothing  
Set PPApp = Nothing
end sub

The macro works as expected on the 1st sheet with the original chart object.

Does anyone know how to use CopyBitmapToClipboard on a Linked Object?

Thank you
Grant