Run-time error:13 Type mismatch

[Latexy]

Hi.

I have this code in sub and its getting this run-time error for some reason. While debug it shows the value for change as "0" and value for textbox could be like "23.60"
If i change the variable as string it works but then calculations wont work.

    Dim change As Double
    change = TextBoxChange.Value

 

[RoryA]

What decimal separator is set in your regional settings?

 

[Latexy]

I think it's comma

 

[RoryA]

That's why it won't coerce to a number. Use Val:

change = Val(TextBoxChange.Value)

 

[Latexy]

Thanks for advice but i already tried that and it didn't give the error but the numeric value was far what it was supposed to be.
Like if the number was in textbox 12,5 the return of val was 43 597,00

 

[RoryA]

You indicated that the textbox had a full stop, not a comma in it. If your regional settings are using the same decimal separator as you are actually using in the textbox, use CDbl instead of Val.

 

[Latexy]

Thanks! That worked for that problem. I'm just learning this coding and trying to make one friend of mine a simple bookkeeping worksheet with form

 

[Latexy]

I restarted the workbook and now it still wont work. Iäm going crazy with this stuff

 

[RoryA]

What exactly is in the textbox when it doesn't work?

 

[Latexy]

I try to tell you it as good as i know. So i have multiple textboxes and the textbox is given value from another textbox when user clicks button. when it gets the value from another textbox it should automatically calculate the current value with another textbox value for textbox showing value of those 2 textboxes.