幻灯片编号问题求助

bosao

请问幻灯片编号在文稿编辑页面里和VBA页面里为何不相同，还存在VBA页面里编号不连续的情况？

leikaiyi123

应该是反复增删和调序所至，并且这不是序号，而是SlideRange.Name

bosao

leikaiyi123 发表于 2018-2-22 12:48
应该是反复增删和调序所至，并且这不是序号，而是SlideRange.Name

能解释下SlideRange.Name起什么作用呢？控件属性也没这个名称啊，大型PPT肯定需要复制删除排序操作的，当在某些页面上添加不同控件后，其在VBA界面都是显示Slide*，如何才能知道控件所对应的Slide*，难道自能通过双击吗？

leikaiyi123

bosao 发表于 2018-2-22 13:50
能解释下SlideRange.Name起什么作用呢？控件属性也没这个名称啊，大型PPT肯定需要复制删除排序操作的，当 ...

插入控件后，会自动生成对应页名称的模块的
Sub 获取选中页的name()
    MsgBox ActiveWindow.Selection.SlideRange.Name
End Sub

Sub 重命名选中页的name()
    ActiveWindow.Selection.SlideRange.Name = "slideN"
End Sub

bosao

新文件任何页面无控件，递增重命名后再次读取，已按顺序显示，然后再插入控件，但资源管理器里所生成对应页名称的模块没发生变化。找了一下午了，关于PPT的VBA资料太少了，头痛。