EXCEL VBA 锁定指定页的指定单元格问题。

EXCEL VBA 锁定指定页的指定单元格问题。

这样写， 运行 第一遍 会 运行OK，
但是 第二遍 就会 返回这个错误，

因为第一遍已经 Protect了， 所有 要有句 Unprotect

ActiveSheet.Unprotect "12345"
Cells.Locked = True
Range("A2:B100").Locked = False
ActiveSheet.Protect "12345"追问因为触发代码的页面和锁定页面不是同一个所以ActiveSheet是不行的，这才产生了上面错误。ActiveSheet.Unprotect "12345"这个也都试了，现在的问题是不能设置Range的Locked属性追答那你就不能写 Activesheet啊,
直接 写 sheets("表名称").cells。。。。。
sheets("表名称").range("A2:B100")。。。。。
sheets("表名称").protect。。。。。。

不就好了追问没错，就是这么写了，才有上图的错误。
ActiveSheet.Unprotect "12345"

ActiveSheet.Protect "12345"

加了也是一样，首先Locked就出问题了。追答看不懂你在讲啥，不是 回复了么，

直接 写 sheets("表名称").cells。。。。。
sheets("表名称").range("A2:B100")。。。。。
sheets("表名称").protect。。。。。。

这些代码一般都要

将 Locked = True追问True 和 False 报错是一样的，不能设置Range的Locked属性。