userform with many buttons

[diddi]

i have a userform with 60 commandbuttons and need some code to loop
through them all, making the ones without captions set to
..visible=false
can't seem to get variables defined properly.

any assistance greatly apprecieted =)

 

[Rod Gill]

Try:

Private Sub UserForm_Click()
Dim O As Object
For Each O In UserForm1.Controls
If O.Caption = "" Then
O.Visible = False
End If
Next
End Sub