禁用工作表中的复选框
禁用工作表中的复选框
提问于 2021-04-14 09:03:43
我只想问一下，如何在我的工作表中禁用复选框编辑？我的工作表已锁定，但我仍然可以选中和取消选中这些复选框。
另外，我使用了下面的代码来禁止在工作表中选择单元格，但我仍然可以编辑复选框。
With ActiveSheet
.protect
.EnableSelection = xlUnlockedCells
End With有人能帮我吗？任何帮助都是非常感谢的。
回答 1
Stack Overflow用户
回答已采纳
发布于 2021-04-14 09:23:03
禁用ActiveX复选框
Option Explicit
Sub disableCheckBoxes()
Dim ole As OLEObject
For Each ole In ActiveSheet.OLEObjects
If TypeName(ole.Object) = "CheckBox" Then
ole.Object.Enabled = False
End If
Next ole
End Sub页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/67084194
复制相关文章
相似问题
腾讯云开发者
