Referirme a un campo

Hola tengo las siguientes lineas de código:
valor = InputBox("INTRODUCE LOS APELLIDOS ")
If DCount("APELLIDOS", "Historico", "[APELLIDOS]='" & valor & "'") > 0 Then
DoCmd.Close acForm, "actual"
DoCmd.OpenForm "Historico", , , "[APELLIDOS]='" & valor & "'" '
DoCmd.OpenForm "jugadores", acNormal
DoCmd.GoToRecord , , acNewRec
Pretendo lo siguiente yo parto de un formulario "actual" el cual al pulsar sale una pregunta, "apellidos"
Entonces busca en el formulario "historico" ese dato si lo encuentra pretendo que abra el formulario "jugadores" e introduzca el registro encontrado de "historico" en "jugadores"
Pero no se como hacer referencia a los campos del fichero histórico, es decir yo pongo
[jugadores].[apellidos]= [historico].[apellidos]
Pero da error, ¿alguien me puede decir la sintaxis correcta?
Gracias

1 Respuesta

Respuesta
1
Entre Docmd. Openform"histórico" y Docmd. Openform"jugadores" escribe
Docmd.runsql"Insert into jugadores select * from histórico where [apellidos]=[form]![histórico]![apellidos]"
Si jugadores e histórico no tuevieran los mismos campos puedes poner
Docmd.runsql"insert into jugadores select nombre, apellidos,fechanac from histórico where...."
De todas formas, si quieres un ejemplo dímelo.
Unn saludo

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas