Add values when checkbox is checked.

[fadib]

Hi guys,
I have 10 textbox filled with values.
Next to each textbox I have a checkbox.
What I want to accomplish is to add all the textbox(s) for which the checkbox is checked.

I was able to do it for two check box, Now that i am going for more, I know that i need to create a loop. I know the logic of it, but I am having hard time to see where to put the variable.

Can anyone help me with that?

[lucas]

On a sheet or on a userform?

[fadib]

Userform.

[lucas]

Can you post your workbook with the userform so we don't have to re-create your scenario?

[fadib]

Here is what I have so far.


[vba]Private Sub CommandButton1_Click()

Dim i As Integer
Dim s As double
Dim a As double
s = 0
a = 0
For i = 1 To 10
If Me.Controls("Checkbox" & i).Value = True Then
a = Me.Controls("textbox" & i).Text
s = Val(s) + Val(a)
End If
Next i
Textbox11.text = val(s)

End Sub[/vba]

[fadib]

I figured it out.
Thank you though Lucas for your initiative in helping me.