如何点击一个复选框，点击所有复选框VBA

Question

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

Answer 1

主要的复选框，点击功能里面添加oleobjects.object.value财产

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

可以以类似的方式添加多个复选框....所以每当主复选框（复选框1）启用复选框子项中的所有其他复选框也将启用