View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Norman Jones Norman Jones is offline
external usenet poster
 
Posts: 5,302
Default OptionButton in a Form

Hi Fred,

Try:

'=======================
Private Sub UserForm_Initialize()
Dim oleObj As MSForms.OptionButton

For Each oleObj In UserForm1.Controls
If TypeOf oleObj Is MSForms.OptionButton Then
oleObj.Visible = False
End If
Next
End Sub

'<<=======================

---
Regards,
Norman



"Fred Russell" wrote in message
...
I'm using 60 OptionButtons in a form. To initialize, I want all the
OptionButtons invisible. How can I index the OptionButtons with a
For-Next Loop to accomplish this? I've tried numerous approaches with no
luck at all... Plenty of error messages.

Any help appreciated.

Thanks,
Fred