'设定可编辑区域
ActiveSheet.Protection.AllowEditRanges.Add Title:="区域1", Range:=Range("E5:H12")
'保护工作表，但允许上面设定的区域可以编辑
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:="123"
'撤销工作表保护
'ActiveSheet.Unprotect
Excel VBA保护工作表
免责声明！
本站转载的文章为个人学习借鉴使用，本站对版权不负任何法律责任。如果侵犯了您的隐私权益，请联系本站邮箱yoyou2525@163.com删除。