如何在EXCEL中禁止剪切功能-excel剪切功能,excel怎么剪切

此方法e79fa5e98193e78988e69d83337只会禁用本工作薄的“剪切”功能，不会影响其他工作薄使用“剪切”功能。而对于工作表之间，也可以类似使用。

其思路为：当工作薄被激活（Activate）时，进行禁用某些功能，当切换到别的工作薄后（Deactivate）解除相应的禁用。当然关闭本工作薄前（BeforeClose）也该解除禁用。

代码如下：复制到ThisWorkBook代码区（在office 2003 正常，在office xp等版本设置可能有所不同）

Private Sub Workbook_Activate() '本工作薄激活时，相应地禁用“剪切”

'禁用菜单栏"剪切",里面的序号代表位置,2和3是2003里的,XP中应该不同,自己修改

Application.CommandBars(1).Controls(2).Controls(3).Enabled = False

'禁用右键中的"剪切",序号1代表第一个选择,2代表复制(这是我的,自己修改你自己的)

Application.CommandBars("cell").Controls(1).Enabled = False

'禁用键盘"Ctrl+x",恢复方法:Application.OnKey "^x"

Application.OnKey "^x", ""

'禁用移动(会把拖动也禁用)

Application.CellDragAndDrop = False

End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean) '关闭前 解除

'解除禁用

Application.CommandBars(1).Controls(2).Controls(3).Enabled = True

Application.CommandBars("cell").Controls(1).Enabled = True

Application.OnKey "^x"

Application.CellDragAndDrop = True

End Sub

Private Sub Workbook_Deactivate() '本工作薄失去焦点时，相应地解除禁用

'解除禁用

Application.CommandBars(1).Controls(2).Controls(3).Enabled = True

Application.CommandBars("cell").Controls(1).Enabled = True

Application.OnKey "^x"

Application.CellDragAndDrop = True   

End Sub

Private Sub Workbook_Open() '打开时， 禁用“剪切”

'禁用菜单栏"剪切",里面的序号代表位置,2和3是2003里的,XP中应该不同,自己修改

Application.CommandBars(1).Controls(2).Controls(3).Enabled = False

'禁用右键中的"剪切",序号1代表第一个选择,2代表复制(这是我的,自己修改你自己的)

Application.CommandBars("cell").Controls(1).Enabled = False

'禁用键盘"Ctrl+x",恢复方法:Application.OnKey "^x"

Application.OnKey "^x", ""  '禁用移动(会把拖动也禁用)

Application.CellDragAndDrop = False

End Sub

既然可以“添加或者修改”就可以“剪切抄”了。因“添加或者修改”就包含了“剪切”在内。
可采用保护工作表办法（设置表模后，只能修改其中部分单元格内容）：
先选择允许修改的单元格：菜单栏——工具——保护——允许用户编辑区域：新建（默认已选择的单元格：标题：区域1，引用单百元格：如=$A$1:$C$5，密码：根据需要——确定——（可修改或继续新建）——确定；菜单栏——工具——保护——保护工作表——（设置密码），允许此工作表的所有用户进行：度通常选择前两项——确定。（Excel 2003版）
如果你是用分别双击的方法打开的两个工作薄，就不能用选择性粘贴，请先打开一个工作表，然后通过“打开”菜单打开另一个工作表，然后两个表之间可以用选择性粘贴。

禁止剪切功能的方法如下：
可采用保护工百作表办法（设置表模后，只能修改其中部分单元格内容）：
1、先选择允度许修改的单元格：
菜单栏——工具——保护——允许用户编辑区域；
2、新建知（默认已选择的单元格：标题：区域1，引用单元格：如=$A$1:$C$5，密码：根据需要——道确定——（可修改或继续新建）——确定；
3、菜单栏——工版具——保护——保护工作表——（设置密码），允许此工作表的所有权用户进行：通常选择前两项——确定。