问一下老师，UserInterfaceOnly怎么运用的？？

twpgq8151

问一下老师，UserInterfaceOnly怎么运用的？？

无聊的疯子

给你二个小小的例子

第一个,设置单元格"A1"格式中>保护>锁定
然后保护工作表,并设置 UserInterfaceOnly 参数为 False
然后用代码写入数据
这时候会提示 错误"单元格受保护,无法更改"

1. 
   
2. Sub c()
   
3.   With Sheet1
   
4.     .Range("A1").Locked = True
   
5.     .Protect , , , , False
   
6.     .Range("A1").Value = 2333
   
7.   End With
   
8. End Sub
   

复制代码

第二个,设置单元格"B1"格式中>保护>锁定
然后保护工作表,并设置 UserInterfaceOnly 参数为 True
然后用代码写入数据
这时候会数据可以写入到 B1 单元格

1. 
   
2. Sub CC()
   
3.   With Sheet1
   
4.       .Range("B1").Locked = True
   
5.       .Protect , , , , True
   
6.       .Range("B1").Value = 2333
   
7.   End With
   
8. End Sub
   

复制代码

通过这两个小例子,就能很直接的体现出  UserInterfaceOnly   的具体作用了!!!

pangz

我有个sheet，用按钮调用
ActiveSheet.Protect Password:=mySecurityCode,  UserInterfaceOnly:=True 保护工作表，可以用vba写入被保护的单元格，但是保存后，重新打开，运行宏却不能写入被保护的单元格了。又被保护了，只能重新设置一遍UserInterfaceOnly:=True 。是不是这个参数的生命周期只在本次。