如何快速去除这种水印？

ccyumo

附件示例中的水印不能通过删除水印功能一次性删除，有没有什么办法能够一次性选择所有水印，一次性删除？ 水印文件.rar (31.87 KB, 下载次数: 25)

2023-11-20 09:35 上传

点击文件名下载附件

ccyumo

坐等高手！！

山菊花

1、按Alt+F11，打开VBE窗口，把下面的代码粘贴到光标处：

1. Sub sctp()
   
2.     Dim tp As Shape
   
3.     Do While ActiveDocument.Shapes.Count > 0
   
4.         For Each tp In ActiveDocument.Shapes
   
5.             tp.Delete
   
6.         Next
   
7.     Loop
   
8. End Sub

复制代码

2、光标定位到代码内任意位置，按F5执行。

ccyumo

山菊花 发表于 2023-11-20 11:01
1、按Alt+F11，打开VBE窗口，把下面的代码粘贴到光标处：

非常感谢回复。除了代码方式，正常的菜单有没有办法去除。我现在通过开始-选择-选择窗格，可以逐个选择逐个删除。但没有办法批量删除。

山菊花

使用“选择格式相似的文本“也不错，删除文本，效果上相似于删除图片。

201403201403

ccyumo 发表于 2023-11-20 11:07
非常感谢回复。除了代码方式，正常的菜单有没有办法去除。我现在通过开始-选择-选择窗格，可以逐个选择逐 ...

CTRL全选中再删除

ccyumo

201403201403 发表于 2023-11-20 11:55
CTRL全选中再删除

多谢。CTRL键确实可以多选，但每次只能多选一个，如果shift可以连选就好了。

gg4816love

ccyumo 发表于 2023-11-20 11:07
非常感谢回复。除了代码方式，正常的菜单有没有办法去除。我现在通过开始-选择-选择窗格，可以逐个选择逐 ...

试过了，在选择窗格中按住Ctrl键可以选择多个文本框，然后按Delete键。我用的版本是Word 2019

常扬帆

经检验，三楼的宏一键搞定！谢谢！