Calculo en formulario

[manolochantada]

Saludos al grupo.
En un formulario tengo tres campos numéricos:
Cantidad
Precio
Total
Y deseo al introducir la cantidad y el precio, me aparezca rellenado de forma automática el campo Total.
No se si se pueden hacer campos calculados en Writer, ya que es la primera vez que intento hacer un formulario.

Un saludo y si me podéis echar una mano pues muy agradecida: Eva Rosa

[PepeOooSevilla]

Hola.
Por favor, sube un archivo de ejemplo que tenga un formulario exactamente igual al que tienes en tu documento (sin datos personales).
Saludos cordiales.

[manolochantada]

Gracias por responder.
Adjunto archivo.

Saludos: Eva Rosa

[PepeOooSevilla]

Hola.

Observa las propiedades de los controles, así como, los sucesos asociados a los controles "cantidad" y "precio". Al suceso "Texto modificado" se le asigna la macro "CalcularPrecioTotal". Al control "total" se le modifica la propiedad "Solo lectura" a "Sí" para que no se pueda alterar el resultado de "cantidad * precio", que previamente ha calculado la macro.

Código: Seleccionar todo

' Macro "CalcularPrecioTotal"
' OOoBasic
Option Explicit

Sub CalcularPrecioTotal
	Dim frmFormulario As Object
	Dim cmpCantidad As Object
	Dim cmpPrecio As Object
	Dim cmpTotal As Object
	
	On Error Goto TRATAERROR
	frmFormulario = Thiscomponent.DrawPage.Forms.getByName("Formulario")
	cmpCantidad = frmFormulario.getByName("cantidad")
	cmpPrecio = frmFormulario.getByName("precio")
	cmpTotal = frmFormulario.getByName("total")
	cmpTotal.Value = cmpCantidad.Value * cmpPrecio.Value
	Exit Sub
TRATAERROR:
	Msgbox "ERROR"
End Sub

Si quieres saber más, lee el capítulo 7 del libro Aprendiendo OOo Basic de nuestro compañero mauricio que trata el tema de los formularios (válido para Writer).

Saludos cordiales.

[manolochantada]

Gracias por tu respuesta PepeOooSevilla. Pero, no existe la posibilidad de campo calculado en Writer donde especificarle directamente la operación a un campo de cálculo sin necesidad de hacerlo a través de Macros?.

De todas, de nuevo muchas gracias: Eva Rosa

[mauricio]

Con controles no... no se para que usas esto, pero Writer no es la herramienta para hacer calculos, si aun deseas hacerlo, usa una tabla, donde si te permite introducir formulas...

Saludos

[manolochantada]

Gracias a todos por vuestra colaboración e información.
La verdad es que a nivel práctico no suelo usar demasiado los formularios. Hice la pregunta porque trataba de hacer la comparativa con Word, donde si se puede crear campos calculados dentro de un formulario.
De todas formas, aclarado y agradecida: Eva Rosa