Access - Copiar un campo autómaticamente de otro

Hola,

Necesito copiar un campo autómaticamente de otro, he visto en este foro una solución pero no me realiza la copia. La solución indicada es la siguiente:

En el campo donde introduces el primer valor, en la propiedad despues de actualizar, inserta el siguiente código.

Me.NombreCampoDestino = Me.NombreCampoOrigen

Cambia el NombreCampo por el nombre real del campo de tu b.d.

Lo he probado en un Formulario, pues en la misma tabla no puedo hacerlo, pero no se crea el registro, igual es porque un campo es autonúmerico y el otro es de texto.

Muchas gracias por vuestra ayuda.

Un saludo,

Atenea

Buenos dias Atenea,

No entiendo porque necesitas "copiar" un campo autonumérico a otro campo. Siendo autonumérico????

Por un lado siendo esto, yo copiar del primer campo la propiedad RecordSource del primero, así seguro que te lo copia integro sin código VBA alguno ya que hace referencia al mismo campo.

Por el otro lado, puesto que es un campo autonumérico y este se "autoactualiza" en lugar de decirselo en el evento, "despues de actualizar", se lo puedes poner "al salir", en este caso seguro que te funciona. El código a introducir seria el siguiente

'Esto son comentarios
'Id --> Autonumerico
'Campo1 --> Campo que cojera el valor

campo1 = id

Así, sin mas complicacion de esto. Te recuerdo que lo pongas al salir del campo autonumérico.

Un saludo

Hola Atenea,

Yo tenia el mismo problema que tu y en vez de poner el codigo en "despues de actualizar" lo he puesto en "al cambiar"

Y no solo eso. En vez de ponerlo en uno de los dos campos en cuestion, esta condicion la he puesto en otro campo. En mi caso en cantidad porque es un campo que siempre voy a editar al entrar registros.

No se si te servirà de ayuda. Però a mi me ha solucionado un problemon.

Para qualquier duda aqui estamos

Hola Moises y Albert,

Muchas gracias por vuestra colaboración, pero no se porqué no se copia el campo, ni en la opción "Al salir", ni "Al cambiar". Comentarte Moises que el hacer un campo autonumérico y otro de texto, es por lo siguiente, yo realicé un base de datos en access 97, y cuando quería relacionar campos de varias tablas si estos campos eran autonuméricos NO me dejaba, siendo estos campos los únicos que podía relacionar entre ellas para poder conseguir lo que quería. Por ejemplo, yo tengo una tabla que es de clientes y otra que es de artículos, para vinculara dichas tablas y relacionar datos, yo no podía relacionar campos autonuméricos que me dije antes no era posible. No sé si ahora es posible en access 2003, lo ideal sería poder relacionar campos autonuméricos o de Texto.

Alguna idea? Muchas gracias

Atenea

Hola Atenea:
Tienes una concepción errónea de los campos:

Los campos AUTONUMÉRICOS son campos númericos que van AUTOINCREMENTÁNDOSE (antiguamente denominados campos CONTADOR).

Para solucionar el "problema" que tienes NO hace falta que acudas a campos texto, puedes hacerlo a campos NUMÉRICOS (entero largo) y punto.

Ejemplo:
Tabla principal de CLIENTES. Tiene, entre otros campos, el campo IdCliente que es AUTONUMÉRICO.
Tabla secundaria de PEDIDOS. Tiene, entre otros campos, el campo IdCliente que es NUMÉRICO (entero largo)
El campo COMÚN de ambas tablas es IdCliente y lo podrás relacionar SIN NINGÚN TIPO DE PROBLEMAS. Además será un campo UNO->A VARIOS.
Saludos
Juan Amorós

Hola Juan,

Muchas gracias por tu ayuda, yo tengo las vinculaciones realizadas de la siguiente manera:
(te vas a sorprender)

Por ejemplo :
Tabla Clientes:
IdCliente como campo autonumerico
IdCliente1 como campo de texto, donde he ido introduciendo el número que me aparerecía en el campo IdCliente, o sea, IdCliente= 150; IdCliente1 = 150
Tabla Pedidos.
IdCliente1 como campo de texto.

Por lo que, yo tengo vinculados los campos IdCliente1 de la tabla Clientes y IdCliente1 de la tabla pedidos (los dos campos de textos). Lo curioso es que en la base de datos busco las vinculaciones de tablas y no tengo ninguna, sin embargo, yo tengo creado formularios y consultas con esas relaciones, por lo que, no se como cambiar las relaciones, igual tendría que ir consulta por consulta cambiando las vinculaciones.

Repaso contigo, lo que debería hacer,

-Cambio el nombre al campo IdCliente, en la tabla clientes y le pongo IdCliente1, pues no puedo indicar a IdCliente que sea autonúmerico no me deja.
-Convertir el campo IdCliente1, en tabla pedidos, como campo numérico.-
-Cambiar en las consultas y formularios las relaciones.-

Sabrías decirme alguna forma de hacer una consulta general donde podría indicarme donde puede aparecer el campo a eliminar.

Muchas gracias, un saludo,

Atenea

Hola a todos y especialmente a Juan,

No era tan complicado como te comentaba, las relaciones sean establecido con normalidad al cambiar todos los campos por autonúmerico y númerico.

Muchas gracias, por todo,

Un saludo,

Atenea

Haria lo siguiente, desde el editor de VB


Un ejemplo

gracias , me funciono muy bien [(Y)
mil gracia de verdad..
Private Sub Form_Load()
Me.Pago = Form_frmCancela.TotalFra
End Sub