The problem is the comma, if you use a period (.) for the separator the total should calculate correctly.

Try this code to see what the results are when you use Val/Dbl and comma/period, I've also added in an empty string to show what will happen if a textbox is empty.
Msgbox Val("1,3")
MsgBox Val("1.3")
MsgBox CDbl("1,3")
MsgBox CDbl("1.3")
MsgBox Val("")
MsgBox CDbl("")