使用VBA代码来限制Excel工作表 可用编辑范围
因工作需要,我们常常需要对工作表的某一范围设置访问权限,禁止别人改动表单某区域的内容。这里向大家介绍使用VBA代码实现这一目标。以下是限制表格“B5:I12”区域。
操作方法
- 01
首先我们打开excel 表格,点击‘’开发工具”,然后点击左侧的”Visual basic“或者直接按“”Alt+F11“”进入vba 代码编辑窗口,见下图
- 02
在右侧的VBA代码窗口输入代码: Private Sub Worksheet_Change(ByVal Target As Range) X = Target End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) If 1 < Target.Column And Target.Column <= 9 And 4 < Target.Row And Target.Row <= 12 Then '这里设置的是禁止修改的区域,根据自己实际修改即可 Y = InputBox("请输入密码:") '弹出密码输入对话框 If Y <> 123456 Then '密码设置 MsgBox "密码错误,你无编辑权限!" Range("A11").Select End If End If End Sub 以上代码有解释,不懂直接粘贴即可
- 03
当鼠标点击禁止修改的区域时便会弹出密码输入对话框,输入密码:123456,即可对其编辑
- 04
如果密码输入错误,便会弹出“无权编辑”对话框
赞 (0)