Entrar Texto en ComboBox

28/05/2010 - 13:09 por JoseMB | Informe spam
Buenos dias


En acces 2003, tengo un formulario A ligado a una tabla A donde hay un
combobox que coge la lista de una tabla B y cuando necesito poner algo que NO
esta en la lista del combobox pues lo escribo a mano en el mismo combobox.

Ahora bien, ¿como hacer para que lo escrito a mano en el combobox se guarde
al salir del combobox en la tabla B que es de donde coge la lista el combobox
para que la proxima vez no haya que escribir lo mismo otra vez?

He provado colocando este codigo en el procedimiento Al no estar en la lista
(Notinlist) puesto asi:

IMPORTANTE, tengo que tener el Limitar a la Lista en NO porque sino no me
sirve de nada y no conseguire lo que necesito.

Private Sub Variedad_NotInList(NewData As String, Response As Integer)

Response = acDataErrAdded

End Sub



Y NO HACE NADA de ninguna forma, ya que lo que quiero es que si en la lista
que se desplega NO ESTA el texto que necesito lo escribo A MANO y que se
guarde en la tabla que contiene la lista.

Ejemplo:

Lista
casa
coche
camion
...

y yo ESCRIBO en el combobox Avion porque no me sale en la lista, quiero que
Avion ademas de guardarse en la tabla que guarda todas las entradas del
formulario, cosa que funciona bien ahora, se guarde tambien en la tabla que
contiene la lista que desplega el combobox por ejemplo en el momento de salir
del Combo.

y eso de momento no pasa

Indico tablas reales:

La que contiene todos los campos del formulario es Registro_Tabla y su campo
Variedad entre otros.

La que contiene la LIsta del Combobox es Variedad_Tabla y su campo
Variedad_Lista

¿Alguien sabria decirme como debo hacerlo con un ejemplo?

Gracias por vuestra ayuda.

Preguntas similare

Leer las respuestas

#1 Patxi Sanz
28/05/2010 - 15:47 | Informe spam
Hola JoseMB:

Ya se te ha respondido en el otro hilo, así que no hace falta volver a crear
uno nuevo.

Y como se te ha respondido en el otro hilo, si tienes la propiedad Limitar a
lista a no, nunca se ejecuta el evento Al no estar en la lista.

Repito: Si la propiedad Limitar a lista está a No, no se ejecuta el evento
Al no estar en la lista.

También puedes buscar en la ayuda de Access este tema:

Cómo: Agregar un valor a un cuadro combinado dependiente

Y una búsqueda en Google te da resultados como estos:

- http://support.microsoft.com/kb/197526
-
http://geeks.ms/blogs/access/archiv...-2007.aspx

Un saludo,


Patxi Sanz
Tudela (NA)
Dirección "corta": http://www.pasa.es.tt/
Dirección "completa": http://users6.jabry.com/patxisanz/
Respuesta Responder a este mensaje
#2 JoseMB
28/05/2010 - 19:48 | Informe spam
Ante todo perdon, no me habia dado cuenta que me habias respondido en el hilo
y por eso lo pregunte otra vez.

Y con las pistas que me has dado y buscado un ejemplo me ha sido suficiente,
ya funciona bien.

Gracias por vuestra ayuda.


"Patxi Sanz" wrote:

Hola JoseMB:

Ya se te ha respondido en el otro hilo, así que no hace falta volver a crear
uno nuevo.

Y como se te ha respondido en el otro hilo, si tienes la propiedad Limitar a
lista a no, nunca se ejecuta el evento Al no estar en la lista.

Repito: Si la propiedad Limitar a lista está a No, no se ejecuta el evento
Al no estar en la lista.

También puedes buscar en la ayuda de Access este tema:

Cómo: Agregar un valor a un cuadro combinado dependiente

Y una búsqueda en Google te da resultados como estos:

- http://support.microsoft.com/kb/197526
-
http://geeks.ms/blogs/access/archiv...-2007.aspx

Un saludo,


Patxi Sanz
Tudela (NA)
Dirección "corta": http://www.pasa.es.tt/
Dirección "completa": http://users6.jabry.com/patxisanz/

.

Respuesta Responder a este mensaje
#3 Patxi Sanz
29/05/2010 - 15:26 | Informe spam
De nada :-)

Un saludo,


Patxi Sanz
Tudela (NA)
Dirección "corta": http://www.pasa.es.tt/
Dirección "completa": http://users6.jabry.com/patxisanz/
Respuesta Responder a este mensaje
#4 Ignacio
01/06/2010 - 09:32 | Informe spam
¡Hola, JoseMB!

Se me olvidó dar de alta el nuevo valor en la tabla.
Además de
Response = acDataErrAdded
debes añadir
CurrentDb.Execute "INSERT INTO Variedad_Tabla (Variedad_Lista) VALUES
('" & NewData & "')"

Si no se actualiza la lista en el combo, además, usa el método
Requery:
NombreCombo.Requery

Espero que te resuelva el problema.
Un saludo,
Ignacio.
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida