Problema al sumar dos TextBox
Tengo problemas al sumar dos TextBox y que la suma de estos se me refleje en un tercer TextBox, ya formate los textbox para que interprete valores numéricos, el caso es que el formulario lo tengo diseñado para que cuando se digite el código aparezcan en otros textbox los datos referentes a este código además hay un ComboBox que tiene precargada una lista, en el caso que el código exista y el ComboBox especifique un concepto en el TextBox Vl_Cancela muestra el valor que corresponde a ese código y ese concepto, además hay otro TextBox en donde se ingresa un valor manual y las suma de estos debe reflejarse en otro TextBox, ya tengo un código para este procedimiento pero solamente me reconoce el valor que ingreso manualmente, a continuación dejo el código que tengo para que me puedan explicar el porque no me realiza la operación de suma los Textbox tienen los siguientes nombres:
TextBox1 = Vl_Cancela (valor cargado mediante codigo NO INGRESADO MANUAL)
TextBox2 = Vl_Otros (valor ingresado MANUALMENTE)
TextBox3 = Tot_Cancela
La operacion que quiero realice es Tot_Cancela = Vl_Cancela + Vl_Otros
este es el codigo que estoy usando
Private Sub Tot_Cancela_BeforeUpdate(ByVal cancel As MSForms.ReturnBoolean)
Tot_Cancela = Format(Val(Tot_Cancela), "###,###,##0.00")
End Sub
Private Sub Vl_Cancela_BeforeUpdate(ByVal cancel As MSForms.ReturnBoolean)
Vl_Cancela = Format(Val(Vl_Cancela), "###,###,##0.00")
End Sub
Private Sub Vl_Canela_Exit(ByVal cancel As MSForms.ReturnBoolean)
valor = Me.Vl_Cancela.Value
Me.Tot_Cancela.Text = Format(valor + otros, "#,#0.00")
End Sub
Private Sub Vl_Otros_BeforeUpdate(ByVal cancel As MSForms.ReturnBoolean)
Vl_Otros = Format(Val(Vl_Otros), "###,###,##0.00")
End Sub
Private Sub Vl_Otros_Exit(ByVal cancel As MSForms.ReturnBoolean)
otros = Me.Vl_Otros.Value
Me.Tot_Cancela.Text = Format(valor + otros, "#,#0.00")
End Sub