Sum multiple TextBox giving live total

[Wales MB]

My TextBox's are called Number1, Number2 and on up to Number20.

I need to sum all these boxes in TextBox1.

Not all of the Number(!) boxes are used every time.

I have tried lots of different things but all I get is 0 in TextBox1.


Just some of the things i have tried....

Please Login or Register  to view this content.

[Norie]

The only way I can see you ending up with a pair of brackets in the textbox would be if one of the textboxes had () in it or one textbox has ( and another ).

If you did have 20 textboxes named Number1, Number2 etc you could sum them like this.

Please Login or Register  to view this content.

PS TypeName will return the name of the type of control here, for example TextBox.

[mikerickson]

Try

Please Login or Register  to view this content.

[Wales MB]

Please Login or Register  to view this content.

Just 0 in TextBox1 - (looking at what i thought was () i now see its 0)

[Norie]

This code will only be run when the worksheet is activated.

If you want a 'live' total you need to move it so it runs every time a textbox changes.

[Wales MB]

This code will only be run when the worksheet is activated.

If you want a 'live' total you need to move it so it runs every time a textbox changes.

Please Login or Register  to view this content.

This works but is there another way without a Private Sub for each Number (TextBox)?

[Norie]

Move the loop to a separate sub and call it from each change event.

Please Login or Register  to view this content.

Or you could use a class, see the attached workbook for a simple example.

[Wales MB]

Can you please have a look at my file I followed the example you sent but still can't get mine to work.....

Yours works well but when i copy the code to mine no sums.

[Norie]

It should be UserForm_Initialize.

Like I said earlier TypeName will return the type of the control, eg TextBox, CommandButton.

Try checking the name of the control.

Please Login or Register  to view this content.

[Wales MB]

Thank you - finally got it to work..... I am knackered i have been on this all day....

Now if i want to also get TextBox2 to add all TextBoxes called Amount1, all the way up to Amount20.......

What would i change??

[Wales MB]

Please Login or Register  to view this content.

worked........

I thank you for all your help......