Hola como estan?

Me he pasado todo el dia, intentando revisar en donde tengo un error y no lo logro.

Les comento, estoy haciendo la suma de un producto de cantidades.

Ej

unidad1 * cantidad1 = subtotal1

unidad2 * cantidad2 = subtotal2

unidad3 * cantidad3 = subtotal3

Saco un suma de los subtotales

Subtotal = subtotal1 + subtotal2 + subtotal3

A este subtotal le saco el IVA

IVA = Subtotal*0.16

Y hasta ahi va bien, pero cuando quiero sumar el subtotal y el IVA, en un textbox que se llame total, no funciona nada

Estoy subiendo el archivo para ver si me pueden asesorar

Pedidos.rar

Los que visitan este tema, echenle un ojo al archivo, por que igual es algo muy sencillo, pero ya me cicle y no le encuentro

Saludos

No se si estoy entendiendo bien si esta es la macro donde tienes el problema.

Sub TotalPago()

Me.TextBox58 = Str(Val(Me.TextBox56.Text) * Val(Me.TextBox57.Text))

End Sub

[/CODE]

Deberia de ser asi:

[CODE]Sub TotalPago()
Me.TextBox58 = Str(Val(Me.TextBox56.Text) + Val(Me.TextBox57.Text))
End Sub
[/CODE]

Si me equivoco indica en donde tienes el error.

Atte.

joshua

muchas gracias, ese era un error, pero en el textbox58 no me aparece la suma ahí es donde estoy atorado

Saludos.

El mismo error.

Private Sub TextBox58_Change()

Me.TextBox58 = CStr(Val(Me.TextBox56.Text) * Val(Me.TextBox57.Text))

TextBox58.Text = Format(TextBox58, "$#,##0.00")

End Sub

[/CODE]

Debe ser asi:

[CODE]Private Sub TextBox58_Change()
Me.TextBox58 = CStr(Val(Me.TextBox56.Text) + Val(Me.TextBox57.Text))
TextBox58.Text = Format(TextBox58, "$#,##0.00")
End Sub
[/CODE]

Atte.

joshua

Gracias [uSER=15065]@joshua[/uSER] pero no suma ni multiplica, si me aparece en ceros el textbox pero de ahi no pasa