中文说明：专业增强版/零售版/32位64位二合一镜像文件名称：ProPlus2019Retail.img文件大小：3.51GBSHA1：d850365b23e1e1294112a51105a2892b2bd88eb9SHA256：f5bea5517a3879792c39127db77aa7e766b4a9897bf52bed0c7e5dc70ccbc3f8下载......
Office2019如何批量删除艺术字
Office教程
2022-04-19 21:48:49
如果你确认了是艺术字且不是嵌入型的，可以按Alt+F11，打开VBA编辑窗口，放入下面这段代码：
Sub 删除艺术字()
Dim sh As Shape
For Each sh In ActiveDocument.Shapes
If sh.Type = msoTextEffect Then
sh.Delete
End If
Next
End Sub
如果没用试试下面这个
Sub 删除艺术字()
Dim sh As Shape
For Each sh In ActiveDocument.Shapes
If sh.Type = msoTextBox Then
sh.Delete
End If
Next
End Sub
需要将文档另存为为带有宏的格式文档，然后执行
标签： Office批量删除艺术字
相关文章
- 详细阅读
-
Office2021 安装/更新和完美激活全教程同时附上黑暗模式设置教程详细阅读
Office2021安装/更新和完美激活全教程同时附上黑暗模式设置教程Office2021改进1、office2021官方正式版提供了更好的工作环境。2、拥有更好的表格设计能力。3、在新版的Excel软件上增加了更好......
2022-04-19 72 Office office2021 office2021下载 office2021安装
- 详细阅读
- 详细阅读
- 详细阅读
