2010-04-22 41 views
2

我有一张带有图片幻灯片(wmf/emp文件)的PowerPoint文件,我想使用VBA将其中的图片元素“取消组合”。如何在PowerPoint中使用VBA“取消分组”图片

我需要问PowerPoint两次才能做到这一点 - 但是这样做。

可以使用VBA完成吗?如果是这样,怎么样?

+0

对象'首先被分组了吗?你是说有多个WMF团队在一起?如果对象仅仅是一个WMF,是不是不会被直接写入GDI而被解构为单独的行? – user225626 2010-04-22 10:35:44

+0

Powerpoint询问是否将该对象转换为Microsoft对象,我同意 - 并将其取消组合。 – 2010-04-22 11:25:32

+1

可以理解,我只是没有足够的资金在不知情的情况下复制你的问题。我假设你准备好了VBA编辑器(你的功能区上的开发人员选项卡)?如果是这样,你是否尝试过在记录宏运行时描述的例程?也许录制宏会选择你正在做的动作,并自动将它们转换成代码开始。如果确实如此,并且将其重新处理到子程序中并不能解决问题,那么......让Sub运行两次即可。 (当然,即使从Record会话中检索到有用的内容,也是如此。) – user225626 2010-04-22 15:04:12

回答

4

这是相当简单 - 从帮助文件:

这个例子取消组合任何分组 形状和拆卸上myDocument中的任何图片或 OLE对象。

Set myDocument = ActivePresentation.Slides(1) 
For Each s In myDocument.Shapes 
    s.Ungroup 
Next 

你可能需要做一些错误,如果它不能解组,如JPG检查,以及一些类型检查(即If s.Type = msoPicture...

+0

太好了,谢谢。 – 2010-04-23 07:33:28

相关问题