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

时间:2011-02-07 21:29:08

标签: vba ms-word powerpoint powerpoint-vba

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

我可以将段落复制并粘贴到演示文稿中。但我还需要能够将Word文档中的图片复制并粘贴到PowerPoint中(并在段落之间的正确位置)。

到目前为止,我能够通过查看段落的样式属性来检测段落是否是图片 - 它会说“图”。但是,我不知道该怎么做。看完网络后,看起来我应该能够做到这一点:

paragraphFromDocument.Range.Copy
currentSlide.Shapes.Paste

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

由于

修改


我也试过了:

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

并收到此错误消息:

  

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

但是,当我使用CopyAsPicture命令时,我可以打开PowerPoint(图片仍然在宏上的剪贴板上)并使用“选择性粘贴”命令将图片粘贴到幻灯片上。

1 个答案:

答案 0 :(得分:1)

paragraphFromDocument.Range.Copy
currentSlide.Shapes.Paste

实际上最终工作了,但我必须首先从范围中删除所有特殊字符。这就是它给我错误信息的原因。