实用Excel公式及VBA代码，不定期更新

![日常使用EXCEL时候记录的一些使用公式或者VBA代码]需一定Excel基础

1.实时填写保护
说明 : 表格内容填写后实时保护,非空单元格内容不可更改,修改必须输入工作表保护密码
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

On Error Resume NextSheet1.Unprotect Password:="111"If Target.Value <> "" Then    Target.Locked = True    Sheet1.Protect Password:="111"End If

End Sub
2.破解工作表密码
说明:适用于可以打开表格,但是没有工作表保护密码(未验证)
sheet1.Protect AllowFiltering:=truesheet1.unProtect

我用阿里云盘分享了「excel实用代码.doc」，你可以不限速下载?
复制这段内容打开「阿里云盘」App 即可获取
链接：https://www.aliyundrive.com/s/ys5bD8oh4Ys