word批量删除艺术字
- 作者: 南方姑娘502
- 来源: 51数据库
- 2020-06-05
1. word2010 批量去除艺术字
如果你确认了是艺术字且不是嵌入型的，可以按Alt+F11，打开VBA编辑窗口，放入下面这段代码：
Sub 删除艺术字（）
Dim sh As Shape
For Each sh In ActiveDocument.Shapes
If sh.Type = msoTextBox Then
sh.Delete
End If
Next
End Sub 执行：可以在编辑窗口直接执行，或在视图——宏——查看宏：选中该宏名称——执行。可能会被存在一次删除不干净的情况，重复几次就可以了。
转载请注明出处51数据库 » word批量删除艺术字
推荐阅读
