Hola.
Estoy mejorando una base de datos, que no ha sido construida por mí, pero cuando intento añadir o modificar un campo del tipo que sea en una de las tablas, me sale "se ha producido el error 13 en tiempo de ejecución / no coinciden los tipos".
Como básicamente no he hecho nada de muy complejo, estoy pensando que sea derivado de la incompatibilidad entre las diferentes versiones del Access.
Todavía, esto es el código que me dice dar error, y a negro donde el depurador me dice estar el problema, que no consigo solucionar:
Private Sub Form_Load()
If Month(Date) >= 11 Then
Me.RecordSource = "Select distinctrow QryRegistosLinhaMensal.* from QryRegistosLinhaMensal Where [Ano]=Year(Date()+90) order by [QryRegistosLinhaMensal].[Month1] desc;"
Else
Me.RecordSource = "Select distinctrow QryRegistosLinhaMensal.* from QryRegistosLinhaMensal Where [Ano]=Year(Date()) order by [QryRegistosLinhaMensal].[Month1] desc;"
End If
End Sub
Me pueden ayudar?
Error 13 No coinciden los tipos
- Sveinbjorn
- Mensajes: 1269
- Registrado: Sab Oct 24, 2015 10:12 pm
Re: Error 13 No coinciden los tipos
Por mi experiencia, cuando las funciones nativas de access, como en tu caso Date(), dan problemas, es que en alguno de los módulos dela aplicación tienes algún error de sintaxis en algún lado.
Mi sugerencia es que vayas al menú Depuración del editor de VBA y uses la opción de compilar, a ver qué errores te marca y solucionarlos.
Mi sugerencia es que vayas al menú Depuración del editor de VBA y uses la opción de compilar, a ver qué errores te marca y solucionarlos.
Sveinbjorn El Rojo
-
- Mensajes: 2
- Registrado: Sab Oct 19, 2019 2:37 pm
Re: Error 13 No coinciden los tipos
Muchas gracias.
Voy a verlo y comentaré algo.
Voy a verlo y comentaré algo.
¿Quién está conectado?
Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados