Ayuda con notinlist

Hola Experto, estoy creando una base de datos de venta de productos, tengo una tabla productos, clientes, ventas. Tengo un formulario de ventas con un cuadro combinado para seleccionar los clientes, si no esta en la lista tengo un código para que me abra el formulario Clientes y agregarlo como nuevo. La pregunta es la siguiente: se puede logar que al escribir el id del cliente en el cuadro combinado del formulario ventas si no existe me abra el formulario cliente ya con el id que escribí en cuadro combinado (o sea que me copie el id del cuadro combinado y me lo pegue en un cuadro de texto del formulario que se abre) No se si he sido claro, espero que si. Desde ya muchas gracias.

1 Respuesta

Respuesta
1
En principio, no hay mucho problema, ya que una vez abierto el nuevo formulario (el de clientes), en el Evento "Al activar registro", le indicas que coja los datos del control del cuadro combinado del otro formulario abierto... este código es algo similar a esto:
Me.CodigoClienteEnClientes:= Forms![Ventas]!CuadroCombinado.Value
Con esto debería ser suficiente... cambia los campos y los nombres de formulario que te propongo aquí para adaptarlos a tu programa...
Un saludo, y espero haber sido de ayuda...
Hola Amigo estuve probando el código que me pasaste, poniéndole los nombres correspondientes y no funciona, tampoco me da error, cuando ingreso un código inexistente, me dice el texto que ha escrito no es un elemento de la lista, ¿desea modificar los elementos de la lista? Cuando hago click en si me abre el formulario clientes pero en el primer registro. No se si estaré pifiando en algo. Gracias nuevamente.
Saludos
Perdona amigo ya he descubierto porque no funcionaba, hace muy poquito he formateado mi pc y tuve que reinstalar todo, es ahí donde me di cuenta que estaban deshabilitada las macros, pero de todas forma me abre el formulario en blanco o sea no copia el contenido del campo, a parte también me da error si quiero abrir el formulario de forma directa para ingresar un cliente que ya se que no existe, espero haber sido claro. Gracias
Creo que el error que te da es porque en el procedimiento "NotInList" tienes que monitorizar el error para evitar que salga (o ponerle tu el error que quieres que aparezca).- Esto se hace con Error. Raise.
- Comprueba también que te está cogiendo correctamente el valor del campo:
Forms![Ventas]!CuadroCombinado. Value (ponle un punto de depuración, y comprueba si tiene valor posicionando encima el cursor).
- Si no tiene valor, es porque la referencia al "forms!..." está mal construida; Puedes usar las consultas (pinchando en la varita mágica) para acceder a Formularios/Formularios cargados... etc y coger el valor que necesites... luego copia esa referencia después del Me. CodigoClienteEnClientes=...
- Y otra sugerencia es que le quites los dos puntos al operador de asignación... tiene que quedar como esto:
   Me.CodigoClienteEnClientes= Forms![Ventas]!CuadroCombinado.Value
en lugar de esto:
   Me.CodigoClienteEnClientes:= Forms![Ventas]!CuadroCombinado.Value
Un saludo, y espero que ahora si funcione...

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Trabajando por primera vez con código vba en formulario de Access.

Estoy aplicando con ayuda de otras personas un código vba a un formulario y a pesar de todo no me funciona como lo esperaba. ¿Alguien en esta plataforma que por favor me revise esta tarea y oriente al respecto?
1 respuesta

Trabajando con formato condicional en formularios de Access.

Estoy construyendo una base de datos en Access. Tengo un formulario principal ¨SERVICIOS¨ que contiene un primer subformulario ¨ETAPAS¨ y un segundo subformulario¨VENTAS¨ (intenté subir la imagen pero no funciona esta opción de la plataforma) Lo que...
5 respuestas

Como puedo hacer para Exportar un informe de Access a PDF añadiendo fecha y la hora actual del Pc

Tengo este código, pero no tiene la fecha y la hora ¿Cómo hago? Sería Algo así cuando guarda: Test 2023-07-06 15:21.PDF Private Sub Comando1172_Click() Dim strUserName As String, strPath As String strPath = "C:\Users\usuario\Documents\test.pdf"...
2 respuestas

Access código para copiar a tabla grupo de opciones

Tengo un formulario independiente con campos independientes. Uno de esos campos es un marco (grupo de opciones) que código podre utilizar para al dar click en el botón guardar me envíe los datos a la tabla específicamente lo que se escogió el el...
2 respuestas

Diferencias entre fechas devuelva año mes días

Tengo en un campo del formulario esto =DifFecha("d";[Formularios]![coches mantenimientos]![AÑO];[FECHA]), me devuelve correctamente los días entre las fechas, pero yo quería en vez de días me dijera La diferencia en años, meses y días.
2 respuestas

Encontrar repetidos en varias columnas

Tengo una tabla que contiene 10 columnas, que he importado de Excel: Nro1, nro2, nro3, nro4, nro5, nro6, nro7, nro8, nro9, nro10. Contienen números tipo texto, por ejemplo. Nro1 nro2 nro3 nro4,..., nro10 0005 4578 1247 1326,... 2147 1247 4587 0035...
1 respuesta

Abrir formulario para pagar con una tecla

Necesito saber si se puede tengo un formulario y subformulario de Ventas2 y DetalleVenta en ventas2 tengo un campo METODO_PAGO el cual el enfoque para cuando termine en detalleventa la selección de productos aplaste una tecla por ejemplo esc y salga...
2 respuestas

Copia de seguridad BD completa Access

Quiero saber si es posible mediante un botón en un formulario en Access crear una copia de seguridad de TODA la base de datos en una unidad USB al pulsar el botón. La unidad está en la ruta: D:\14gb\ Cuando digo TODA la BD son tablas, consultas, etc..
2 respuestas

Indices en tablas

Tengo 8 tablas dentro de la base de datos, y todas tiene en común el mismo campo, exactamente no se como relacionar todas las tablas es decir en que campo relacionarlas, si de una a muchos o todas contra todas, ademas no se si colocarles un indice a...
3 respuestas

Como pasar una importaciones guardada en Access a vba

Estoy trabajando con datos que provienen desde una base de datos de SQL server, hago los pasos de importación y los guardo en importaciones guardadas, funciona de maravilla, pero cuando no hay conectividad con el servidor falla, ya que previa a la...
2 respuestas