Necesito que en formulario se haga calculo desde checkbox de acuerdo a su característica.
Estimada Elsa Matilde
Hice esta pregunta en el foro y creo no fui muy claro, lo que necesito es que por ejemplo activo el checkbox de construcción material y también el checkbox factura me considere el cálculo con ambos.
Por ejemplo si las horas son 100 el valor hora 10 el total sería 1000 pero si activo el checkbox construcción material a ese total le sumaría 200 entonces el total serian 1200, hasta ahí funciona, pero si además activo el checkbox factura al total le descontará 19%, el resultado debería ser 972 y esto último es lo que no logro realizar.
Lo otro no se si las variables están bien definidas, ya que si pruebo con valores bajos menores a 100 funciona, pero con valores superiores a 1000 no funciona me arroja error destaca la variable "Factura"
El valor calculado solo necesito verlo en el mismo formulario
Desde ya muy agradecido
1 Respuesta
No te respondí la anterior por encontrarme de licencia... aún lo estoy ;)
Acabo e descargar el ejemplo dejado allí y mi propuesta es la siguiente:
Private Sub CmbCalcular_Click() Dim MontoTotal As Integer Dim Factura As Integer Dim Boleta As Integer Dim CMaterial As Integer Dim CPruebas As Integer MontoTotal = (TextBox2.Value) * (TextBox3.Value) 'Factura = MontoTotal - (MontoTotal * 19 / 100) 'Boleta = MontoTotal - (MontoTotal * 10 / 100) 'CMaterial = MontoTotal + 200 'CPruebas = MontoTotal + 80 TextBox4.Value = MontoTotal If ChBoxCMaterial = True Then TextBox4.Value = MontoTotal + 200 'CMaterial MontoTotal = TextBox4.Value End If If ChBoxCPruebas = True Then TextBox4.Value = MontoTotal + 80 'CPruebas MontoTotal = TextBox4.Value End If If ChBoxFactura = True Then TextBox4.Value = MontoTotal - (MontoTotal * 19 / 100) 'Factura MontoTotal = TextBox4.Value End If If ChBoxBoleta = True Then TextBox4.Value = MontoTotal - (MontoTotal * 10 / 100) 'Boleta MontoTotal = TextBox4.Value End If 'TextBox4.Value = MontoTotal 'End If 'End If 'End If 'End If End Sub
Donde se ejecutarán todos los checkbox, acumulando o no resultados.
Con respecto a las variables seguramente llegarás a valores mayores a Integer. Declaralas como Long o Double si van a ser con decimales.
Sdos y no olvides valorar esta respuesta. Tengo tu libro con macro ajustada que lo podés solicitar a mis correos que aparecen en sitio que dejo al pie.
¡Gracias!
Mil gracias estimada Elsa, como siempre atenta, sencilla, humilde y clara en las explicaciones.
probaré lo propuesto, y confirmo.
