Eduardo Pérez Fernández

Lo puede hacer con máscara de entrada (no me agrada) o mediante código (es la mejor), ya que se puede validar que solo acepte números y no letras u otros caracteres. Si quiere el ejemplo puede solicitarlo a [email protected] favor en el asunto...

Pruebe con este código INSERT INTO POLIZAS(Cotizacion) SELECT * FROM Cotizaciones WHERE Cotizacion = " & Me.Cotizacion Si cotización es texto debe ir entre apostrofe ' '

Por mi parte no lo haría gratis. TodoExpertos es para consultar dudas, inicie el proyecto y vaya preguntando a medida que avanza, seguro que yo u otros le podremos colaborar.

Si el formulario es totalmente dependiente puede programar el evento Antes de Actualizar, por ejemplo, A nivel del formulario If Me.Dirty Then If MsgBox("Los datos han cambiado" & vbCrLf & " ¿Guarda los cambios?", vbQuestion + vbYesNo +...

¿Cómo está llamando los datos del formulario oculto?

Haga clic sobre el botón derecho del mouse en cualquier parte donde están las tablas y seleccione "Propiedades", en "Valorres Únicos" seleccione Sí. Es decir, en código SQL la consulta inicia con SELECT DISTINCT .......

Seria conveniente subiera una imagen así puedo darle una respuesta para no improvisar

Un recordset se recorre con Do Until - Loop o Do while - Loop. Pruebe con este código, aunque desconozco la Consulta2. Dim db As DAO.Database Dim rs As DAO.Recordset Dim i As Integer Set db = CurrentDb Set rs = db.OpenRecordset("Select * from...

No se puede leer bien el diseño de la consulta, pero seguro que lo debe hacer con LIKE. Suba una imagen más legible a ver si le puedo colaborar.

Parece que el origen de datos del formulario es una consulta y esto causa el problema al intentar adicionar registros, no obstante, una imagen ayuda a dar un concepto más acertado.