满足条件时,使用宏保护Excel电子表格

时间:2014-08-08 12:43:30

标签: excel vba excel-vba

我有一个包含SOME只读(受保护)列的电子表格的工作簿。

我希望有一个宏,当用户在该工作表上勾选一个框时会运行该宏,这个宏将保护其余的部分保护整个工作表受保护(只读)。

它不一定要打勾,但我希望它们在电子表格中注明:“我已经完成,冻结了!”

1 个答案:

答案 0 :(得分:0)

我会建议这样的事情,尽管可能有更好的方法。

If CheckBox1.Value = True Then 
ActiveSheet.Protect Password:="yourpassword", DrawingObjects:=True, Contents:=True, Scenarios:=True

要取消保护工作表,可以放置:

ActiveSheet.Unprotect ("yourpassword")

激活工作表或打开工作簿时。

希望这有帮助。