有没有办法折叠/扩展PowerPoint部分

Question

全部在标题中.. 使用Presentation.SectionProperties，我可以添加/删除/重命名部分，但我找不到折叠/展开的方法。

Answer 1

有趣的问题，谢谢你的提问。我想了解一下，但问题如下：

Dim oDW As DocumentWindow
Set oDW = Windows(1)
With oDW
    .ExpandSection 2, False
End With

不是非常直观地使用PPT对象模型，是吗？