怎么禁止使用word2003或2007的复制（包括CTRL+C）、剪切、编辑功能？

发布网友 发布时间：2022-05-16 08:44

我来回答

共3个回答

热心网友 时间：2023-10-17 03:14

可以用代码控制，不过保存时会提醒个人信息丢失，系统就删除了。下次打开还是可以复制。没办法，谁叫你是低层呢。下面是代码，想试可以用一下，按
ALT+F11，进入VBA编译器，把代码复制进去，调试》运行。就可以，一时的，你玩玩吧~~

Sub cc()
With Application

'屏蔽常用工具栏剪切、复制、粘贴
.CommandBars(3).Controls("剪切(&T)").Enabled = False
.CommandBars(3).Controls("复制(&C)").Enabled = False
.CommandBars(3).Controls("粘贴(&P)").Enabled = False

'屏蔽单元格右键菜单中的剪切、复制、粘贴命令
.CommandBars("Cell").Controls("剪切(&T)").Enabled = False
.CommandBars("Cell").Controls("复制(&C)").Enabled = False
.CommandBars("Cell").Controls("粘贴(&P)").Enabled = False

'屏蔽编辑菜单中的剪切、复制、粘贴命令
.CommandBars(1).Controls("编辑(&E)").Controls("剪切(&T)").Enabled = False
.CommandBars(1).Controls("编辑(&E)").Controls("复制(&C)").Enabled = False
.CommandBars(1).Controls("编辑(&E)").Controls("粘贴(&P)").Enabled = False

'屏蔽键盘剪切、复制、粘贴键
.OnKey "^x", ""
.OnKey "^c", ""
.OnKey "^v", ""
End With
End Sub

热心网友 时间：2023-10-17 03:14

不用文档保护、只读属性、强制保护、PDF格式这些方法，貌似不能完成你的目的。并且，你既便禁止这些功能，还可以用硬复制来完成。

热心网友 时间：2023-10-17 03:15

还是不知道你的最终目的，如果只是文档内容不想别人直接利用的话，我建议你这样操作：工具—保护文档—编辑*—填写窗体—是，启用强制保护—输入密码，OK了。试试吧，word文档就会像图片一样，无法复制，剪切，编辑。