Vba 如何以编程方式将图片从Word复制到Powerpoint？

我正在创建一个宏，用于将Word 2007文档转换为结构化PowerPoint 2007演示文稿。我将文件的所有段落循环一遍，并将它们复制到新的演示文稿中

我能够很好地将段落复制并粘贴到演示文稿中。但我还需要能够将Word文档中的图片复制并粘贴到PowerPoint中（以及段落之间的正确位置）

到目前为止，我能够通过查看段落的样式属性来检测段落是否为图片，它将显示“Figure”。但是，我不知道从那里该怎么办。在线查看后，我似乎应该能够做到这一点：

paragraphFromDocument.Range.Copy
currentSlide.Shapes.Paste

但是，这似乎不起作用。如何将图片从Word复制到PowerPoint

谢谢

编辑

---

我也试过：

paragraphFromDocument.Range.CopyAsPicture
currentSlide.Shapes.PasteSpecial(ppPasteMetafilePicture)

并获取此错误消息：

Shapes.PasteSpecial:请求无效。剪贴板为空或包含可能无法在此发布的数据

但是，当我使用CopyAsPicture命令时，我能够打开PowerPoint（宏中的图片仍在剪贴板上），并使用“粘贴特殊”命令将图片粘贴到幻灯片上

paragraphFromDocument.Range.Copy
currentSlide.Shapes.Paste

事实上，我最终还是成功了，但我必须先删除范围内的所有特殊字符。这就是它给我错误信息的原因

事实上，我最终还是成功了，但我必须先删除范围内的所有特殊字符。这就是它给我错误信息的原因