Question

EXCEL VBA如何保护工作表的时候，同时复选框把编辑对象选中？求代码，谢谢！

目的是保护后，可以插入批注，但是不能修改数值。

Answer 1

选上编辑对象，编辑方案即可
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:= _
False
可以的

追问

不是手动操作，而是用VBA宏执行，我试了不行的啊。

追答

请问你是怎么用的？
ActiveSheet表示当前活动的工作表，要想激活别的我建议在前面加条指定工作表激活就可以了，要是不想显示闪屏，关闭屏幕更新就好了。

追问

Private Sub CommandButton1_Click()
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:= _

False
End Sub
我就在EXCEL里加了个控件按扭，按了就执行啊，执行以后，只是保护工作表数值不被修改，但是不能插入批注。

追答

我也不知道为什么运行不了。我的建议是先录制好宏，然后使用窗口上的控件运行录制的宏，或者干脆在表格中加一个带宏的控件，指定录制的宏。我实验了以上两种方式是可以的。

Answer 2

ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:= True

追问

大哥，你这是用录制宏出来的吧？不能实现功能的啊，你试下

Answer 3

自己录一个宏
将你描述的操作都做一遍就知道代码了