如何禁用Excel中的剪切、复制、粘贴功能？
发布时间：2022-02-28 21:24:53
Q：在Excel中，如何禁止使用剪切、复制、粘贴功能，以避免他人破坏我的数据？
A：在Excel 2003中，常使用下面的代码来禁用剪切、复制、粘贴等功能。
DimcmdBar As CommandBar
DimcbrCtl As CommandBarControl
SubDisableCutCopyPaste()
‘禁用快捷菜单中的命令
DoWithControl 21, False ‘剪切
DoWithControl 19, False ‘复制
DoWithControl 22, False ‘粘贴
DoWithControl 755, False ‘选择性粘贴
‘快捷键命令
With Application
.OnKey “^c”, “”
.OnKey “^x”, “”
.OnKey “^v”, “”
.CellDragAndDrop = False
.OnDoubleClick = “test”
End With
EndSub
SubDoWithControl(iId As Integer, blnState As Boolean)
Dim cmbBar As CommandBar
Dim cmbCtl As CommandBarControl
On Error Resume Next
For Each cmbBar In Application.CommandBars
Set cmbCtl =cmbBar.FindControl(ID:=iId, Recursive:=True)
If Not cmbCtl Is Nothing ThencmbCtl.Enabled = blnState
Next cmbBar
EndSub
Subtest()
MsgBox “命令不可用!”
EndSub
然而，在Excel 2007及以后的版本中，上述代码只能禁用快捷菜单和快捷方式的剪切、复制、粘贴等功能，在功能区中剪切、复制、粘贴仍然可以使用，快速访问工具栏中的也可以使用。如下图1所示。
图1
从图1中可以看出，单元格快捷菜单中的剪切、复制、粘贴等功能命令全变灰了，即表示不能使用了，但功能区和快速访问工具栏中的仍然可用。
此时，需要通过XML代码定制功能区来实现禁用功能区命令。关闭工作簿并使用Custom UI Editor打开工作簿，输入下图2所示的XML代码：
图2
验证无误并保存，关闭Custom UI Editor，重新打开工作簿，可以看到功能区和快速访问工具栏中的剪切、复制、粘贴等功能也都变灰了，如图3所示。
图3
注：当在VBE或者其他应用程序中进行复制操作后，复制的数据会保存在剪贴板中，可以通过剪贴板在工作簿中粘贴这些数据。我想，可以使用DataObject对象来删除剪贴板的内容。
0
投稿猜你喜欢
长时间盯着电脑，容易造成眼疲劳，电脑屏幕亮度的不合适也会引起眼睛的不适，适当的调节屏幕亮度便可解决这个问题，下面与大家分享下快速调节的方法每- 方法一、直接缩小图像在excel中点击“插入--图片”，然后选择好图片即可插入图片到里。很多人会选中图片的右下角会出现一个箭头，通过拖动箭头
- 惠普电脑重装系统教程，很多朋友都想要知道惠普电脑重装系统的方法是什么，其实惠普电脑系统重装是非常简单的，既然大家都想要知道惠普电脑系统重装的
- 电脑硬盘双击后打不开怎么办？近期有用户发现，在双击电脑磁盘分区后，竟然无法打开，只能打开C盘，这是怎么回事呢？电脑硬盘打不开该如何修复？请看
- Solidworks是一款3D机械设计软件，该软件提供了大量创新的新型生产效率增强功能，使您可以充分利用最新的尖端硬件技术。但是近期有Win
- blender最新版怎么设置调成中文？Blender是一款开源免费的三维综合软件，高效建模系统、视口可视化系统，全新的代码架构，建模更高效。
- 您是父母并担心您的孩子在看什么吗？怎么避免孩子通过网络接触到不良的信息而影响孩子的身心健康呢？家中有小孩子的Mac用户可能会遇到以下困扰，当
- 在Excel2010工作表中，用户可以将被选中单元格中的小数设置分数表示，Excel2010的分数格式将小数四舍五入为值最接近的分数。 在分
- 有时候我们在重装新的系统，发现新的系统上没有我的电脑图标，不知道这么才能找回来，因为桌面不像以前那样了，因为缺少了我的此电脑图标，为此有用户
- 这篇文章主要介绍了win10安装ie8提示系统不支持怎么办?win10不支持ie8的解决方法的相关资料,需要的朋友可以参考下本文详细内容介绍
- * 原形是一款开放式科幻类动作冒险游戏，玩起来非常的刺激，然而很多玩家为了更好的体验而选择更新了win10系统，不过更新完毕之后却遇到了玩不
- 2022年win10最新版本是什么？Win10系统是现在非常稳定的电脑操作系统，目前已经来到了5月份，Win10系统经过不断的更新修复，版本
- 随着电脑的使用，越来越多的垃圾文件占用着内存，想要给C盘做个大扫除，但又怕删错了重要文件，导致系统的无法正常运行。那么Win10系统电脑C盘
- 一般情况下大部分小伙伴都是会使用系统默认的鼠标指针方案，但也有一些小伙伴想要设计专属于自己的个性化鼠标，那么Win11要如何更换鼠标指针图案
- Win10 18353 预览版19H1推出后相关玩家立马进行了更新升级，因为上一版本中无法正常运行LOL，相信不少玩家已经等久了！根据网友反
- pdf有密码怎么编辑修改内容？当我们在使用pdf文档的时候有时候我们会遇到一些无法编辑的PDF文档，这是怎么一回事呢？其实是因为文档的作者加
- 这篇文章主要介绍了Win11控制面板里没有高清音频管理器如何解决?的相关资料,需要的朋友可以参考下本文详细内容。最近有用户反应，自己升级完W
- win10电脑怎么改开机用户名？win10系统支持用户个性化定义自己的电脑系统，在开机界面，默认的是使用管理员账户名称，那么想要使用自己账号
- Windows找不到文件请确定文件名是否正确怎么解决？最近有不少用户使用电脑的时候运行某些程序时就突然出现这个弹窗，下面小编就带着大家一起具
- Win10笔记本外接显示器选仅第二屏幕出现卡顿、掉帧如何解决？现在很多用户都在在使用笔记本电脑，使用起来非常的便捷，但是对于喜欢大屏幕的朋友
