Did you try

ppSlide.Shapes.PasteSpecial (ppPasteOLEObject)