删除Powerpoint演示文稿中的命名对象

用户名

PowerPoint演示文稿中有一些名为“ MYobject”的对象。我需要一个宏来删除那些名为“ Myobject”的对象。我怎样才能做到这一点?

我用来标记对象的代码:

Sub TagObject()

On Error GoTo ErrorHandler

    Dim oSh As Shape

    For Each oSh In ActiveWindow.Selection.ShapeRange
        oSh.Tags.Add "Myobject", "YES"
    Next
    MsgBox "Done! Object has now been tagged.", vbInformation
    Exit Sub

ErrorHandler:

    MsgBox "Please select an object before tagging.", vbExclamation
    End Sub
史蒂夫·林兹伯格

这将删除所有带有Myobject标签=“ YES”的形状

Sub DeleteMyObjects()

    Dim oSl As Slide
    Dim oSh As Shape
    Dim x As Long

    ' note that this will not delete shapes
    ' within groups
    For Each oSl In ActivePresentation.Slides
        For x = oSl.Shapes.Count To 1 Step -1
            If UCase(oSl.Shapes(x).Tags("Myobject")) = "YES" Then
                oSl.Shapes(x).Delete
            End If
        Next    ' Shape
    Next    ' Slide

End Sub

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章

来自分类Dev

打开PowerPoint演示文稿并隐藏窗口

来自分类Dev

如何从演示文稿中删除计算

来自分类Dev

在PowerPoint演示文稿中以编程方式编辑文本

来自分类Dev

在VBA powerpoint中如何将新幻灯片添加到空白演示文稿

来自分类Dev

获取PowerPoint演示文稿的当前缩放

来自分类Dev

回形针:如何上载Powerpoint演示文稿文件

来自分类Dev

Excel VBA无法在Office 2016中将SaveAs嵌入式PowerPoint演示文稿保存

来自分类Dev

如何在Ubuntu中查看带注释的Powerpoint演示文稿?

来自分类Dev

从Word VBA编辑PowerPoint演示文稿页脚

来自分类Dev

PowerPoint:在演示文稿中多次重复使用幻灯片

来自分类Dev

如何在PowerPoint演示文稿中包含子点

来自分类Dev

设置Powerpoint演示文稿的语言

来自分类Dev

录制PowerPoint演示文稿时如何获得演示者视图?

来自分类Dev

如何在Ubuntu中查看带注释的Powerpoint演示文稿?

来自分类Dev

删除PowerPoint演示文稿中所有未使用的母版幻灯片

来自分类Dev

嵌入其他PowerPoint演示文稿中的幻灯片

来自分类Dev

如何在Excel VBA中获取打开的PowerPoint演示文稿的处理程序

来自分类Dev

如何使用Apache的POI以编程方式从Powerpoint演示文稿中读取图形值?

来自分类Dev

VBA Powerpoint,在整个演示文稿中在后台运行定时任务/宏

来自分类Dev

将来自其他Powerpoint演示文稿的幻灯片的链接副本嵌入到另一个Powerpoint演示文稿中

来自分类Dev

Libre Office Impress-在MS-Office Powerpoint上启动的演示文稿中未显示注释

来自分类Dev

循环播放Powerpoint演示文稿的选定部分

来自分类Dev

如何将标题幻灯片插入PowerPoint演示文稿中?

来自分类Dev

如何修复PowerPoint 2016演示文稿中某些幻灯片的母版不匹配?

来自分类Dev

回形针:如何上载Powerpoint演示文稿文件

来自分类Dev

当OneDrive在不同的路径上时,在PowerPoint演示文稿中链接OneDrive媒体

来自分类Dev

VBA列出PowerPoint演示文稿的所有对象名称

来自分类Dev

Excel 更新 PowerPoint 演示文稿

来自分类Dev

在 PowerPoint 演示文稿中调整大小/位置形状

Related 相关文章

  1. 1

    打开PowerPoint演示文稿并隐藏窗口

  2. 2

    如何从演示文稿中删除计算

  3. 3

    在PowerPoint演示文稿中以编程方式编辑文本

  4. 4

    在VBA powerpoint中如何将新幻灯片添加到空白演示文稿

  5. 5

    获取PowerPoint演示文稿的当前缩放

  6. 6

    回形针:如何上载Powerpoint演示文稿文件

  7. 7

    Excel VBA无法在Office 2016中将SaveAs嵌入式PowerPoint演示文稿保存

  8. 8

    如何在Ubuntu中查看带注释的Powerpoint演示文稿?

  9. 9

    从Word VBA编辑PowerPoint演示文稿页脚

  10. 10

    PowerPoint:在演示文稿中多次重复使用幻灯片

  11. 11

    如何在PowerPoint演示文稿中包含子点

  12. 12

    设置Powerpoint演示文稿的语言

  13. 13

    录制PowerPoint演示文稿时如何获得演示者视图?

  14. 14

    如何在Ubuntu中查看带注释的Powerpoint演示文稿?

  15. 15

    删除PowerPoint演示文稿中所有未使用的母版幻灯片

  16. 16

    嵌入其他PowerPoint演示文稿中的幻灯片

  17. 17

    如何在Excel VBA中获取打开的PowerPoint演示文稿的处理程序

  18. 18

    如何使用Apache的POI以编程方式从Powerpoint演示文稿中读取图形值?

  19. 19

    VBA Powerpoint,在整个演示文稿中在后台运行定时任务/宏

  20. 20

    将来自其他Powerpoint演示文稿的幻灯片的链接副本嵌入到另一个Powerpoint演示文稿中

  21. 21

    Libre Office Impress-在MS-Office Powerpoint上启动的演示文稿中未显示注释

  22. 22

    循环播放Powerpoint演示文稿的选定部分

  23. 23

    如何将标题幻灯片插入PowerPoint演示文稿中?

  24. 24

    如何修复PowerPoint 2016演示文稿中某些幻灯片的母版不匹配?

  25. 25

    回形针:如何上载Powerpoint演示文稿文件

  26. 26

    当OneDrive在不同的路径上时,在PowerPoint演示文稿中链接OneDrive媒体

  27. 27

    VBA列出PowerPoint演示文稿的所有对象名称

  28. 28

    Excel 更新 PowerPoint 演示文稿

  29. 29

    在 PowerPoint 演示文稿中调整大小/位置形状

热门标签

归档