EXCEL VBA 锁定指定页的指定单元格问题。
答案:3 悬赏:80 手机版
解决时间 2021-02-19 23:44
- 提问者网友:
- 2021-02-19 10:12
EXCEL VBA 锁定指定页的指定单元格问题。
最佳答案
- 五星知识达人网友:孤老序
- 2021-02-19 11:33
这样写, 运行 第一遍 会 运行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。。。。。。
但是 第二遍 就会 返回这个错误,
因为第一遍已经 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。。。。。。
全部回答
- 1楼网友:雪起风沙痕
- 2021-02-19 12:52
这些代码一般都要
- 2楼网友:长青诗
- 2021-02-19 12:28
将 Locked = True追问True 和 False 报错是一样的,不能设置Range的Locked属性。
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯