Changing the visibility of Textbox/Label Based on Two Checkboxes
You are probably triggering each checkboxes click event from the other. Use
a boolean to control, like this
Private Sub Yes_Click()
If Not fReEntry Then
With Me
fReEntry = True
'your code
fReEntry = False
End With
End If
End Sub
--
__________________________________
HTH
Bob
"R Tanner" wrote in message
...
Hi,
I have a userform with two checkboxes. One I have named Yes and one I
have labeled No.
This is my code in the No Event procedure
UserForm2.Yes.Value = _
Not UserForm2.Yes.Value
This is my code in the Yes event procedure
UserForm2.No.Value = _
Not UserForm2.No.Value
It works perfectly. The problem is that I want to add code to change
the visibility of the textbox and label directly below it. When I try
what I have below, it screws everything up and the checkboxes don't
work correctly.
This is what I have in each of the event procedures right above the
above code I just displayed:
Yes_Click
Select Case UserForm2.Yes.Value
Case Is = "True"
UserForm2.SendToRepLabel.Visible = True
Case Is = "False"
UserForm2.SendToRepLabel.Visible = False
End Select
No_Click
Select Case UserForm2.Yes.Value
Case Is = "True"
UserForm2.SendToRepLabel.Visible = True
Case Is = "False"
UserForm2.SendToRepLabel.Visible = False
End Select
Any ideas what this is doing that is screwing up my checkboxes? I
mean, the select statements are not modifying the value of the
checkboxes, so why would it screw with their behavior?
Thanks
|