Adding values as a total instead of just creating a big nonsense figure.

[hensucker]

I have a spreadsheet which im just setting up as a test for now, i have a row of data and in cell G1 for instance i have a number.
When the user inputs a new number in a Textbox i want it to add that number to the existing number in G1 here is the code for this.

Private Sub CommandButton1_Click()
Sheets("Sheet1").Range("G1").Value = Sheets("Sheet1").Range("G1").Value & TextBox1.Value
End Sub


The above code, just adds the numbers together to make a bigger number like for example:

G1 = 1 & Textbox1 = 1, when i press the command button the value in cell G1 = 11, instead of it being the number 2 which is 1 + 1.
Can this be changed?

[Pepe Le Mokko]

Hi
perhaps first add some code tags as per forum rules

[hensucker]

I have a spreadsheet which im just setting up as a test for now, i have a row of data and in cell G1 for instance i have a number.
When the user inputs a new number in a Textbox i want it to add that number to the existing number in G1 here is the code for this.

Please Login or Register  to view this content.

The above code, just adds the numbers together to make a bigger number like for example:

G1 = 1 & Textbox1 = 1, when i press the command button the value in cell G1 = 11, instead of it being the number 2 which is 1 + 1.
Can this be changed?

[arthurbr]

I'm not a VBA man myself but the ampersand & is usually used for concatenation. Maybe the problem is there?

[Andrew-R]

Like this, maybe:

Please Login or Register  to view this content.

[hensucker]

Spot on that man, i knew the ampersand wasn't doing much when i tried the plus i got a runtime error, i never implemented the Val() so thank you.
Thread Resolved.

[Kelshaer]

Use:

Please Login or Register  to view this content.