VBA取消组合形状(SmartArt)

时间:2017-02-21 13:55:06

标签: vba powerpoint powerpoint-vba

有谁知道如何通过VBA取消组合SmartArt元素?

Sub UngroupSmartArt()

Dim shapeWithSmartArt As Shape
Set shapeWithSmartArt = ActivePresentation.Slides(2).Shapes(2)

shapeWithSmartArt.Ungroup

End Sub

我收到此代码的错误: “只能为群组访问此成员。”

对我来说没有任何意义,因为很容易在powerpoint本身做到这一点(右键点击SmartArt - > Group - > Ungroup)。这让我疯狂:)

任何人都可以帮我解开SmartArt元素/形状吗?

我也查看了类似的question,但它无法正常工作,因为与通过powerpoint本身制作的结果相比,未分组的结果不同。

请帮帮我。我真的很感激任何帮助!

0 个答案:

没有答案