How to select Items after dynamically creating CheckBox

[aivin]

Hello,
I have what is supposed to be a simple problem with dynamic Checkbox. I'm making a list CheckBox in UserForm.

Dim chkbox As MSForms.CheckBox
Dim i As Integer

For i = 1 To 3
   Set chkbox = Me.Controls.Add("Forms.Checkbox.1", "Checkbox_" & i)
    chkbox.Caption = "Test " & i
    chkbox.Left = 18
    chkbox.Top = 112 + ((i - 1) * 20)
    chkbox.Width = 108
    UserForm1.Height = 165 + ((i - 1) * 20)
Next x

As elsewhere in the code
How to choose and change the Caption for an example: Checkbox _2 witch Caption "Test 2" ?

 

[Domenic]

It looks like you want to change the caption for a specified CheckBox. If so, here's an example that changes the caption for Checkbox_2...

UserForm1.Controls("Checkbox_2").Caption = "New Caption" 'change the caption as desired

Although, if the code resides in the UserForm code module, you can use the keyword Me to refer to the UserForm...

Me.Controls("Checkbox_2").Caption = "New Caption" 'change the caption as desired

Hope this helps!

 

[aivin]

That's exactly what I meant. thanks for your help !

 

[Domenic]

You're very welcome, I'm glad I could help.

Cheers!