如何单击一个单击所有复选框 VBA 的复选框答案

【问题标题】：How to Click on one Checkbox that clicks all Checkboxes VBA如何单击一个单击所有复选框 VBA 的复选框
【发布时间】：2017-03-07 18:33:39
【问题描述】：

我希望能够单击 Excel VBA 上的一个复选框，该复选框能够单击其他 5 个复选框。我的场景是我想创建一个显示 5 种数据类型的表，我想要完成的是创建一个复选框来单击所有这些其他复选框，因此加载所有数据而用户不必检查所有 5 个其他复选框。如果用户勾选了所有其他 5 个选项，我希望也勾选此复选框，并且当用户单击然后取消单击此复选框时，所有选项都将取消选择。希望有人能帮忙？

【问题讨论】：

标签： excel vba checkbox

【解决方案1】：

在主复选框单击函数中添加 oleobjects.object.value 属性

sub checkbox1_click()
activeworkbook.sheets(1).oleobjects("checkbox_2").object.value=true
end sub

您可以以类似的方式添加更多复选框....因此，每当启用主复选框（复选框 1）时，复选框子中的所有其他复选框也将被启用

【讨论】：

类似地，你也可以通过创建一个检查五个复选框值是否为真并更改主复选框的值的子复选框来反转这个......