Hi Bijl167,

Try:

Private Sub UserForm_Initialize()
Dim ctrl As Control
For Each ctrl In Me.Controls
If TypeName(ctrl) = "CheckBox" Then
With ctrl
.Value = True
.Enabled = True
.Visible = True
End With
End If
Next
End Sub


---
Regards,
Norman



"Bijl167 " wrote in message
...
Hi,

I have X objects on a Form on which the same actions need to be done at
initialisation. Does anyone know how I can do this without typing the
code for all objects.

what I have tried


from i=1 to end

tickbox= "object" & i

With tickbox
value=true
enabled= true
visible=true

next i


The problem that I have is that I don't get VBA to recognise the
varuiable tickbox as an objectname, tho there is an object named
"objectname1"

Can anyone help
Thnx!


---
Message posted from http://www.ExcelForum.com/