使用VSTO在PowerPoint中对象前面的对象列表

Question

PowerPoint幻灯片中几乎没有形状对象。矩形，椭圆，平行四边形，三角形和五角大楼以该顺序绘制，这意味着矩形在所有对象的背面。

当通过PowerPoint中的对象迭代时，可以获取所有位于对象前方/后面的对象的列表，并部分或完全落在其内部中。 PowerPoint中可能有很多对象，并且将每个对象与每个对象进行比较是一个不利的解决方案。

我想将对象列表（在这种情况下 - 椭圆形，平行四角和三角形）与矩形有关。如何使用VSTO以编程方式实现这一目标？

Answer 1

PowerPoint对象模型提供返回或设置指定形状对象的形状类型的属性，该对象必须代表autoShape以外的其他行，自由图绘图或连接器。因此，您可能会使用类似的东西：

If ActivePresentation.Slides(1).Shapes(1).Type = msoAutoShape Then
  If ActivePresentation.Slides(1).Shapes(1).AutoShapeType = msoShapeOval Then
    'Do something here
  End If
End If