Add two textbox value

[PARSA]

HI,
WAHT CAN I ADD TWO TEXTBOX VALUE?
I DO THIS CODE:

Dim c As Value
Dim D As Value
c = Format(TextBox1.Value, "Number")
D = Format(TextBox2.Value, "Number")
TextBox3.Value = c + D

BUT IT IS WRONG
CAN YOU HELP ME?

 

[AlphaFrog]

It's bad form to use all CAPS.

Try something like this...

    [color=darkblue]If[/color] IsNumeric(TextBox1.Value) And IsNumeric(TextBox2.Value) [color=darkblue]Then[/color]
        TextBox3.Value = [color=darkblue]CSng[/color](TextBox1.Value) + [color=darkblue]CSng[/color](TextBox2.Value)
    [color=darkblue]End[/color] [color=darkblue]If[/color]

 

[Aaron Blood]

There is a lot wrong with the code...

1) In your Dim statement, "Value" is not a valid data type.
2) You are setting c and d "Value" variables to a Format result, which is a text string.
3) "Number" is not a valid predefined format type that can be used with the Format command

Your code would fail for any of these 3 reasons...

If you dimension the variables properly and make valid use of the Format command you can add textboxes values together without too much difficulty.

My response to this thread yesterday is how I would also respond today, if the syntax of your code wasn't so far off:
http://www.mrexcel.com/forum/excel-...ng-userform-textboxes-formatted-currency.html

 

[Aaron Blood]

Actually... item 2) above is fine, in fact, that's what I do on my other response.
But follow the link to the other thread if you want to see how to manage it.