Suma en subformularios de Access

Te ofrecemos un sencillo truco para realizar sumas en subformularios de Access y luego presentarlas en el formulario principal, un ejemplo clásico es en un formulario de facturas o albaranes cuando tenemos que presentar la suma del importe de todas las lineas de factura.

Supongamos la clásica factura que tenemos en un formulario de Access y en dicho formulario tenemos incluido un subformulario donde presentamos las líneas de las facturas, como es lógico tenemos que tener un cuadro de texto en el formulario donde obtengamos la suma del importe de todas las lineas del subformulario, para ello tenemos que hacer los siguientes pasos:

1. Creamos un cuadro de texto independiente en el pié del subformulario lineas de factura, éste cuadro de texto lo vamos a llamar txtSuma (ojo, no la itequeta del cuadro de texto).
2. Como origen del control ponemos:
   =Suma([unidades]*[precio])
   donde «unidades» es el campo cantidad de artículos de una determinada línea de factura y «precio» es el campo precio del artículo.
3. Ahora nos vamos al formulario principal y creamos un cuadro de texto que vamos a llamar txtTotal y cuyo origen del control va a ser:
   =[forLineasFactura].[Formulario]![txtSuma]
   donde «forLineasFactura» es el nombre del subformulario donde tenemos las líneas de factura y «txtSuma» es el nombre del cuadro de texto del subformulario donde anteriormente hemos hecho la suma.

Este truco funciona bien con controles independientes pero si el resultado de la suma tenemos que insertarlo en un control dependiente (con origen de datos) tendremos que usar otro método y es usando la función Dsum:

• En el evento «Despues de actualizar» del subformulario ponemos el siguiente código:
  Parent!txtSuma = DSum(«Importe», «conFacturasLin», «NroFactura = Parent!NroFactura»)

  Donde:
  Parent!txtSuma es el control dependiente que queremos actualizar del formulario principal.
  Importe es el nombre del campo.
  conFacturasLin es el nombre de la tabla o consulta donde tenemos el campo anteriormente citado.
  NroFactura = Parent!NroFactura es el criterio que le pasamos a la función Dsum, que quiere decir que nos sume el campo Importe de la tabla o consulta conFacturasLin cuando el campo NroFactura sea igual al control NroFactura del formulario principal.

Con ésto tenemos solucionado el sumar en subformularios y que tenemos que presentar en el formulario principal, el ejemplo está realizado en Microsoft Access 2003 en español, recuerda que si es en inglés tienes que cambiar el nombre de la función Suma por Sum y Formulario por Form.

Para cualquier duda dejamos los comentarios abiertos.

Publicaciones relacionadas

Como cambiar color de fondo con casilla de verificación en Access

Convertir a mayusculas en Access

ACCESS DATO TEXTO ASOCIADO A UN VALOR AUTONUMERICO

formulario access

Abrir ComboBox al recibir el enfoque

Cómo se hace un salto de línea en un MsgBox de Access