View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
PaulW PaulW is offline
external usenet poster
 
Posts: 130
Default Togglebuttons in a Userform.

My userform has 2 togglebuttons. Both should clear checkboxes 1-4, and enable
these checkboxes if the togglebutton is "on", or disable if the togglebutton
is "off".

This is working great so far. and this is probably only a little thing, but
when I click one of the buttons to "On", I want the other to revert to "Off".

I had it on _change() instead of _click() but the problem was still the
same. If one of the buttons is set to "on" and I click the other it will
indeed reset the first to "off", but thats all it does. The frame and
checkbox Disable and the button isn't clicked "on". I also tried moving the
part about changing togglebutton1 to false to the top, but doesn't seem to
help.

It appears that the macro is triggering because you click on the box, but
its not switching it on on the first click for some reason?

Private Sub ToggleButton2_click()

With Frame1
.Enabled = ToggleButton2.Value
End With

With CheckBox1
.Value = False
.Enabled = ToggleButton2.Value
End With

With ToggleButton1
.Value = False
End With

End Sub