Completar tabla de importe, con saldo y total con códigos vba
De Todoexpertos.
Tengo la siguiente tabla. Que llega hasta importe, cuyo contenido de la tabla se genera de un formulario. Lo que quiero es crear celda que me dé el saldo o resto y total a pagar. O sea, si en el año debe pagar, por ejemplo, $600.000, dando según el importe el saldo que resta, pero no lo quiero con fórmula, porque al generarse los datos en la tabla no me da el resultado con fórmulas de excel, por lo tanto debería ser con códigos vba, o si hay alguna forma de hacerlo con fórmulas, pero que me vaya dando el resultado de forma automática si estar copiando fórmulas en cada celda. Gracias, en caso de no entender favor preguntarme.
1 respuesta
Lo primero es que deberías concretar si es en Access o en Excel. Supongamos que es Access. Si tengo una tabla como la imagen
Y con ella creo un formulario, da igual si es único o continuo. Lo pongo de ésta última forma porque se ve mejor. Voy poniendo datos y puedes ver que el cursor aún está en el control Importe
Cuando pulso Enter
En Resta me pone lo que queda pendiente de pagar de los 600.000 euros y en Total me va poniendo la suma acumulada de lo que me va pagando. A medida que vaya rellenando
El código del evento Después de actualizar del control Importe es
Private Sub Importe_AfterUpdate()
DoCmd.RunCommand acCmdSaveRecord
Resta = 600000 - DSum("importe", "tabla1", "alumno='" & Me.Alumno & "'")
Total = DSum("importe", "tabla1", "alumno='" & Me.Alumno & "'")
End Sub
