excel中复选框activex控件变色问题

Question

excel中复选框activex控件变色问题设置了一个activex控件变色的代码如下
Private Sub CheckBox1_Change()
If CheckBox1.Value Then CheckBox1.ForeColor = vbRed Else CheckBox1.ForeColor = vbBlack
End IfEnd Sub
想问一下，同一张表格中，如果我有100多个复选框都要变色，有没有批量公式。

另保存的时候，保存什么格式，是否正常格式即可

Answer 1

用for循环遍历工作表

Answer 2

可以追问

我当然知道可以，问题是怎么编辑