如何在Excel中禁用剪切、复制和粘贴功能?
Excel是一个用于处理数据和进行大量计算的有用工具。在某些情况下,为了避免无意的数据更改或未经授权的复制,您可能希望限制某些功能。您可以通过关闭剪切、复制和粘贴功能来维护Excel工作簿的完整性和安全性。本文将探讨实现此目标的各种方法,使您能够根据自己的特定需求修改Excel的行为。让我们开始吧!
禁用剪切、复制和粘贴功能
在这里,我们将为整个工作簿插入VBA代码以完成任务。让我们来看一个简单的过程,学习如何在Excel中禁用剪切、复制和粘贴功能。
步骤1
考虑任何Excel工作表。首先,右键单击工作表名称,然后选择“查看代码”以打开VBA应用程序。然后双击此工作簿。
右键单击 > 查看代码 > 双击。
步骤2
然后将下面提到的代码复制到文本框中,类似于下图。
代码
Private Sub Workbook_Activate() Application.CutCopyMode = False Application.OnKey "^c", "" Application.CellDragAndDrop = False End Sub Private Sub Workbook_Deactivate() Application.CellDragAndDrop = True Application.OnKey "^c" Application.CutCopyMode = False End Sub Private Sub Workbook_WindowActivate(ByVal Wn As Window) Application.CutCopyMode = False Application.OnKey "^c", "" Application.CellDragAndDrop = False End Sub Private Sub Workbook_WindowDeactivate(ByVal Wn As Window) Application.CellDragAndDrop = True Application.OnKey "^c" Application.CutCopyMode = False End Sub Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) Application.CutCopyMode = False End Sub Private Sub Workbook_SheetActivate(ByVal Sh As Object) Application.OnKey "^c", "" Application.CellDragAndDrop = False Application.CutCopyMode = False End Sub Private Sub Workbook_SheetDeactivate(ByVal Sh As Object) Application.CutCopyMode = False End Sub
步骤3
然后使用快捷键ALT + Q关闭VBA应用程序以完成任务。
结论
在本教程中,我们使用了一个简单的示例来演示如何在Excel中禁用剪切、复制和粘贴功能。
广告