请教,可以通过Excel VBA判断复选框是黑色的,还是红色的吗?选中为红色,未选为黑色。

2024-12-13 17:03:36
推荐回答(2个)
回答1:

假设复选框名称为CheckBox1,你可以在对应的CheckBox1控件的Click事件中写代码如下:
Private Sub CheckBox1_Click()
If Me.CheckBox1.Value = True Then
Me.CheckBox1.ForeColor = 255 ' 勾选后字体变为红色
Else
Me.CheckBox1.ForeColor = 0 ' 取消选择后字体变为黑色
End If
End Sub

回答2:

你指什么颜色?判断颜色?还是说 判断是否选中分别显示不同颜色?显示哪里的颜色?