vba - shape.Parent 不返回 Slide

Question

大多数情况下 shape.Parent是包含形状的幻灯片。

但是，如果您尝试删除一个组，然后按撤消键(形状将重新出现)，但是子形状将为 .Parent 抛出异常和 .ParentGroup .

在上述情况下，如何找出形状的幻灯片 ID？

Answer 1

我按照你的指示做了，没有任何问题。我在一张空的空白幻灯片中添加了两个形状，然后同时删除了它们，然后按 Ctrl+Z。然后我在直接窗口中运行了这个 -

?ActivePresentation.Slides(1).Shapes(1).Parent.SlideIndex

它有效并显示值为 1。

然后我认为你把这些作为一个组，所以我把这两个形状分组并做与上面相同的操作。它工作得很好。