Evitar el error 438 en un proceso de una rutina de calculo

Utilizo este proceso para calcular el PVP en un formulario continuo:

En el momento que elimino la instrucción de cerrar el form: INTERMEDIOCALCULO dentro del: for .. Next me da el error 438.

Lo intento cerrar porque me relentiza un poco el proceso del calculo.

Tambien tengo el problema que la imagen de forndo que tengo en escritorio me la apaga cuando ejecuto este proceso

Lo que intento es realizar esta rutina de calculo de otra manera para poder realizar la operatoria de forma más rápida.

2 respuestas

Respuesta
1

Hay cosas que en principio no entiendo

1º Defines una variable bucle que luego no usas para nada

2º Usas la instrucción Forms! Intermediocalculopvp. Requery. No sé para que, ya que lo que hace esa instrucción es que el objeto, en este caso dicho formulario "reconsulte" su origen de registros.

3º ¿Por qué no pones las instrucciones de cálculo de Unidades y ÁreaProducto después del

For i=1 to...

De forma que ese cálculo te lo haga en cada registro

4º Como veo que "no te traes" ningún dato del formulario IntermedioCálculo..., ¿no sería más sencillo que con la instrucción "insertaras los valores del formulario en la tabla origen del formulario IntermedioCálculo...

¿Puedes poner alguna imagen de los formularios?

Respuesta
1

Esto nunca le va a funcionar así suprima el Requery, todo indica que el formulario INTERMEDIOCALCULOPVPDIRECTO lo abre oculto para hacer un cálculo pero ¿Qué hace con el cálculo?

Ahora, si utiliza :

Forms!INTERMEDIOCALCULOPVPDIRECTO!idproducto=Me.idproducto

¿Reemplaza o es nuevo registro? ¿No será que debe abrir el formulario filtrado por el idproducto?

DoCmd.OpenForm "INTERMEDIOCALCULOPVPDIRECTO", , , "idproducto=" & Me.idproducto, , acHidden

Personalmente replantearía el proceso haciendo la inserción o update directamente en la tabla origen de datos del formulario .

En error 438 indica que "El objeto no admite esta propiedad o método", porque se están consumiendo todos los recursos del sistema causado posiblemente por el Me. Requery.

De todas maneras espero que encuentre la solución.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Error en un bucle, solo me da el valor del primer registro del Form.

Estoy utilizando esta rutina para extraer el PVP con acceso a otro formulario para extraer datos: Dim bucle As Integer Dim i As Integer DoCmd.GoToRecord , , acFirst For i = 1 To Me.Recordset.RecordCount DoCmd.OpenForm "COMBINADOSMATERIALES", , , , ,...
1 respuesta

Sumar Productos Iguales en una factura para que no existan id de productos repetidos y se sumen los importes si así se quisiera

Como crear en el subformulario la opción que me permita que al colocar el mismo código de producto lo sume.
2 respuestas

Recorrer las líneas de un Formulario continuo

Tengo un Formulario Continuo que he de recorrer cada una de sus Líneas para realizar cálculos. Utilizo esta secuencia: DoCmd. GoToRecord,, acFirst For i = 1 To Me.Recordset.RecordCount Call CALCULARCOEFICIENTES DoCmd.GoToRecord , , acNext Next La...
2 respuestas

ACCESS. Agregar un registro de Producto a la tabla factura detalle.

Tengo un formulario Factura y otro FacturaDetalle. Quiero que en el segundo (facturaDetalle) que al no saber el código IDproducto como suele pasar. Con un botón en el mismo registro me active un cuadro dialogo; por ejemplo "Buscar Producto" y que...
2 respuestas

Crear un tiempo de espera antes de extraer los datos de un Formulario

Tengo que recoger los datos calculados de un formulario, y necesito crear un tiempo de espera para que al al abrir el formulario este tenga tiempo y realice la totalidad de todos los cálculos. También me serviría saber como hacer que mientras los...
2 respuestas

¿Cómo actualizar automáticamente un formulario cuando se han cambiado datos en otro formulario?

Un formulario no continuo, vamos a llamarlo principal, contiene un combo con nombres de personas. La lista de nombres no se puede modificar en ese formulario. Cuando hay que modificar o añadir un nombre de persona, mediante un comando se abre un...
1 respuesta

Error '2118' Conflicto de escritura al actualizar un subformulario.

Mi problema es debido a un conflicto de escritura bastante extraño, ya que me ocurre la mayoría de las veces pero no siempre. Tengo un formulario de PRESUPUESTOS en el que se ingresa el CLIENTE a quien va dirigido el presupuesto y dentro de ese mismo...
2 respuestas

Actualización de Formularios que son llamados desde otro Formulario principal

Tengo un Formulario principal que llaman a otros Formularios dentro de un ciclo: For i = 1 To Me.Recordset.RecordCount. Tengo un proceso que se van realizando Cálculos dentro del Form Principal y se van llamando a otros Formularios que recogen los...
2 respuestas

Actualizar campo al eliminar registro de subformulario

Tengo un formulario (FConsulta) y dentro del mismo he insertado un subformulario (SubVehiculos) que me muestra una serie de datos. Dentro del formulario ha insertado un textbox llamado txtTotalRegistros y en el origen del control tengo puesto...
2 respuestas

Actualizar y visualizar los campos en un formulario después de realizar cálculos.

Tengo un formulario que en el Evento Al activar el registro realizo una serie de cálculos y los campos calculados pasan después a diferentes campos del Formulario. No me actualiza los campos si no realizo a través de un botón la actualización de los...
2 respuestas