.HasSmartArt未识别复制/粘贴智能艺术

时间:2017-06-26 21:08:00

标签: vba powerpoint

我一直致力于一个程序,该程序遍历PowerPoint演示文稿的对象并修改其中的文本。当试图找出一个与smartart相关的不同问题时(当我有更多信息时,我可能会在这里询问)我偶然发现了这个问题。

如果我在演示文稿中有一个smartart并将其复制/粘贴到新幻灯片中,那么我的程序会忽略它。检查它是否为smartart的if语句如下所示。

*Code for cycling through slides and objects in a presentation*
with object
    If .Type = msoPlaceholder And Not .HasChart And Not .HasTextFrame And Not .HasTable And .HasSmartArt Then
*Does stuff to the object*

复制/粘贴smartart是否会破坏对象的某些属性?或者我的代码对于找到smartart是不好的。

0 个答案:

没有答案