如何设定excel表格数据输入后自动锁定不能修改

首先我们打开一个空白的工作表

选定要保护的工作表,Ctrl+A全选所有单元格

Ctrl+1打开单元格格式对话框

保护→去掉"锁定"前面的对钩

审阅选项卡→保护工作表

在密码框中两个输入密码123456→确定

Alt+F11打开VBE窗口,在左上的工程窗口双击要保护的工作表,把下面的代码粘贴进去就OK了

代码：

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)  ActiveSheet.Unprotect Password:="123456" 
If Target <> "" Then 
Target.Locked = 1ActiveSheet.Protect Password:="123456" 
End If
End Sub

测试，你在工作表里输入100没事，你把100改成200，就不行，弹出了提示对话框