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

Question

我有一个带有电子表格的工作簿，其中包含一些只读(受保护的)列。

我希望有一个宏，当用户在该工作表上勾选一个框时，这个宏将保护其余的coluns，显示整个工作表受到保护(只读)。

它不需要在框中滴答作响，但我希望它们在电子表格中显示：“我已经完成了，不许动！”

Answer 1

我会提出这样的建议，虽然可能有更好的方法来做。

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

为了解除被单的保护，可以放置：

ActiveSheet.Unprotect ("yourpassword")

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

希望这能有所帮助。