** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - Error 2118 Guardar campo activo
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Error 2118 Guardar campo activo

 Responder Responder
Autor
Mensaje
Jehosuah Ver desplegable
Habitual
Habitual


Unido: 24/Agosto/2009
Localización: España
Estado: Sin conexión
Puntos: 111
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita Jehosuah Cita  ResponderRespuesta Enlace directo a este mensaje Tema: Error 2118 Guardar campo activo
    Enviado: 09/Abril/2019 a las 14:02
Hola otra vez,
He puesto en un formulario dos subformularios con gráficos, y a veces, no siempre, cuando pongo el año en un campo del formulario, que tiene el evento de después de actualizar, en el que paso los datos al gráfico del subformulario correspondiente a ese campo de año, me da el error 2118 "Debe guardar el campo activo antes de ejecutar la acción Nueva Consulta."
el código de ese evento es el siguiente:

Private Sub SelAñoGrafColorAnt_AfterUpdate()
Dim cadena As String
DoCmd.SetWarnings False
cadena = ""

'GRAFICO 2
DoCmd.RunSQL "DELETE ControlActGraf2.* FROM ControlActGraf2;"
cadena = "INSERT INTO ...(quito la sentencia sql porque es grande y no creo que tenga nada que ver)

DoCmd.RunSQL cadena

DoCmd.RunCommand acCmdSaveRecord
Me![SelAñoGrafColorAnt].SetFocus

Me![Sub Control Actividad Gráficolor 2].Form![Gráfico10].Requery
Me![Sub Control Actividad Gráficolor 2].Visible = True
End Sub
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable