Imprimir página | Cerrar ventana

actualizar celda en formulario

Impreso de: Foro de Access y VBA
Categoría: Access y VBA
Nombre del foro: Access y VBA
Descripción del foro: Foro de programacion en Access (Con código y sin código)
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=86779
Fecha de impresión: 27/Marzo/2026 a las 02:46


Tema: actualizar celda en formulario
Publicado por: kraftwerk
Asunto: actualizar celda en formulario
Fecha de publicación: 14/Septiembre/2023 a las 18:51
Hola,
soy bastante nuevo en access y me estoy haciendo un programa para trazar los equipos que se envían a cliente con el nº de serie, cliente y fecha de introducción de datos.
El problema lo tengo que no sé como hacer para que unos campos del formulario se queden fijos y solo varíe el campo del nº de serie. Es decir, necesito saber la forma de meter muchos nº de serie con el resto de campos y no moverme de la celda de nº de serie para poder meterlos con una pistola de lector de códigos.
sería ésto, meter con la pistola todo el rato números en esa casilla y al ejecutar el enter de la pistola se cree el registro pero que siga ahí para seguir metiendo más.
Para que la tabla quede así.

Muchas Gracias



Respuestas:
Publicado por: kraftwerk
Fecha de publicación: 14/Septiembre/2023 a las 19:08
Como no consigo insertar las imágenes os dejo el link donde están.

https://postimg.cc/gallery/hj3LGZz

Gracias





Publicado por: mounir
Fecha de publicación: 14/Septiembre/2023 a las 20:27
Hola!

Presionando la tecla Enter. Prueba poner en el evento después de actualizar del campo:

      
DoCmd.GoToRecord , , acNewRec
                 
                   'o
      
DoCmd.GoToRecord , , acNext



Espero que te sirva.

-------------
Un Saludo.


Publicado por: kraftwerk
Fecha de publicación: 14/Septiembre/2023 a las 20:44
Hola,
gracias por la respuesta lo he conseguido pero parcialmente, el cursor se queda en esa ventana pero, a la hora de meter el registro se borran todos los campos. El único que se debería borrar es el campo "serial".

Gracias


Publicado por: xavi
Fecha de publicación: 15/Septiembre/2023 a las 07:21
Hola,

En un caso muy parecido al tuyo (también se trataba de leer códigos de barras asociados al mismo registro de cabecera) lo que hice fue utilizar la propiedad DefaultValue de los controles cada vez que se producía un cambio de valor. 

En el AfterUpdate pasas el valor del control a la propiedad DefaultValue. Si lo haces para todos excepto para "serial", ya lo tendrías.

Nota: estudia bien el DefaultValue porque en función del tipo de datos se hace de forma distinta.

Más cosas: se puede automatizar el paso de los registros de manera que, al finalizar la lectura del código de barras automáticamente se salve el registro y se pase al siguiente.

Un saludo





-------------
Xavi, un minyó de Terrassa

http://www.llodax.com" rel="nofollow - Mi web


Publicado por: kraftwerk
Fecha de publicación: 15/Septiembre/2023 a las 08:05
Hola,
me ha funcionado, muchas gracias. 
He puesto una sentencia como esta a cada campo y funcionó.

Private Sub usuario_AfterUpdate()
usuario.DefaultValue = usuario
End Sub

Ahora voy a seguir indagando otras cosillas que quiero hacer en este archivo y sino lo veo claro volveré a preguntar.

Gracias!!


Publicado por: kraftwerk
Fecha de publicación: 16/Septiembre/2023 a las 12:20
Hola de nuevo,
tengo otra duda que no resuelvo.
La columna serial la tengo configurada como indexada con SI (Sin duplicados), el problema que tengo es que si se repite un número me salta a modo depurador, me gustaría que en vez de eso me saltara un mensaje de "número repetido" y nada más.
He probado con varios modelos que he visto por internet con DLookup pero no acabo de conseguirlo, se puede hacer? o con la columna indexada con SI ya no es posible que muestre un mensaje?

Muchas Gracias


Publicado por: xavi
Fecha de publicación: 18/Septiembre/2023 a las 06:45
Hola,

Abre un hilo distinto para esta duda así no mezclamos temas.

Un saludo


-------------
Xavi, un minyó de Terrassa

http://www.llodax.com" rel="nofollow - Mi web


Publicado por: kraftwerk
Fecha de publicación: 18/Septiembre/2023 a las 13:34
Hola,
de acuerdo, así lo haré.

Gracias



Imprimir página | Cerrar ventana