求助如何批量删除单选与复选框

jackievon · 发表于 2020-9-11 10:02

求助如何批量删除单选与复选框之前有个宏代码可以实现，现在找不着了，请教高手们！谢谢！
因为有大量文件要处理，需要批量去除这些！一个一个删太费时了！

如附件与下图：
QQ浏览器截图20200911100157.png

cuteword · 发表于 2020-9-11 12:23

在aidocx.com上下载word百宝箱，里面的整理，删除，简单型，控件和脚本按钮，可以满足你的需要
参考帖子：http://club.excelhome.net/thread-664005-1-1.html

jackievon · 发表于 2020-9-11 15:35

cuteword 发表于 2020-9-11 12:23
在aidocx.com上下载word百宝箱，里面的整理，删除，简单型，控件和脚本按钮，可以满足你的需要
参考帖子： ...

谢谢你，虽然实现不了！

cuteword · 发表于 2020-9-11 16:40

我试过了，要设置选项：

cuanju · 发表于 2020-9-11 17:59

Sub d0()
Rem 删除指定域代码
Application.ScreenUpdating = False
For Each oField In ActiveDocument.Fields
      If oField.Code Like "*HTMLCONTROL*" Then
         oField.Delete
      End If
Next
Application.ScreenUpdating = True
End Sub

jackievon · 发表于 2020-9-12 14:04

cuanju 发表于 2020-9-11 17:59
Sub d0()
Rem 删除指定域代码
Application.ScreenUpdating = False

谢谢大神！

wdpfox · 发表于 2020-9-14 10:30

学习了，谢谢分享！

We meet by chance like patches of drifting duckweed,
May everything be fine with you everyday !
（你我萍水相逢，愿君一切安好！）

		自动登录	找回密码
密码			免费注册

[求助] 求助如何批量删除单选与复选框