View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Bob Phillips[_3_] Bob Phillips[_3_] is offline
external usenet poster
 
Posts: 2,420
Default 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