¿Cómo sumar dos años a una fecha?
Hola buenas tardes, estoy iniciando mis conocimientos en access y tengo algunas dudas, si es posible que qluien me pueda ayudar al respecto, mi pregunta es:
Tengo dos campos: FechaInicio y FechaFin, lo que que quiero es que en el campo FechaFin me devuelva automaticamente la fecha actual más 2 años, algo asi: <11/04/2013> <11/04/2015> .
De antemano les agradezco vuestra ayuda.
1 Respuesta
Si trabajas desde un formulario, lo que tienes que hacer es esto:
1/ Abres el formulario en vista diseño, y te colocas sobre el campo FechaInicio.
2/ Click Derecho -> propiedades.
3/ Vas a la pestaña eventos, y te colocas en la fila Después de actualizar. Verás que te aparece a la derecha un botón con 3 puntos. Lo pulsas y seleccionas generador de eventos.
4/ Entre las dos lineas que te aparecen (Private Sub... y End Sub), pegas este código:
If IsNull(Me.FechaInicio) Or Me.FechaInicio = "" Then
Me.fechaFin=""
Exit Sub
end if
Me.FechaFin = DateAdd("yyyy", 2, Me.FechaInicio)
Cierras todo guardando los cambios y listo!
Buenos días, gracias por su atención, pero hice lo que Ud. me dijo pero no resulta nada, inserto una fecha en el campo FechaInicio y no hace ningún cambio en FechaFin.
No se que puede estar pasando, espero pueda ayudarme.
Gracias experto.
Sube una copia de tu BD a www.filebig.net, pega aquí el enlace de descarga y miro a ver que pasa.
Muchas gracias, le envío la bd que apenas estoy empezando a construirla y los enlaces que resultaron al momento de enviarle el archivo.
Un saludo
http://www.filebig.net/files/bn8uDy6bwM
http://www.filebig.net/files/bn8uDy6bwM
<b><a href="http://www.filebig.net/files/bn8uDy6bwM">http://www.filebig.net/files/bn8uDy6bwM</a></b>
ahí tienes: <a>http://filebig.net/files/wM7QVaWmxA</a>
El código lo tenías puesto donde no era (lo pusiste en un control llamado Texto26, que no existe), por eso no te funcionaba...
Ahora lo tienes en el evento después de actualizar del campo FechaInicio.
