我有一个使用许多表单复选框的 Excel 工作表。有没有办法一次取消选择所有复选框？

【问题标题】：I have an Excel sheet that uses many form checkboxes. Is there a way to deselect all checkboxes at once?我有一个使用许多表单复选框的 Excel 工作表。有没有办法一次取消选择所有复选框？
【发布时间】：2017-01-22 01:39:09
【问题描述】：

我有一个 62 张的 Excel 文档。每个工作表都有许多表单控制复选框。有没有办法一次性清除这些复选框？

【问题讨论】：

是的。但是你能展示一下到目前为止你尝试了什么吗？

标签： excel checkbox vba

【解决方案1】：

试试下面的代码：

Option Explicit

Sub ChkBoxes()

Dim Sht As Worksheet
Dim Cb As CheckBox

For Each Sht In Worksheets '<-- loop through all worksheets
    For Each Cb In Sht.CheckBoxes '<-- loop through all checkboxes in sheet
        Cb.Value = False
    Next Cb
Next Sht

End Sub

【讨论】：