Access - fechas URGENTE

 
Vista:

fechas URGENTE

Publicado por marian (32 intervenciones) el 07/02/2005 11:06:02
HAY ALGUNA FORMA DE HACER QUE UN CAMPO FECHA SE INCREMENTE UN AÑO MEDIANTE UN COMANDO O MACRO O ALGO????
ADEMAS NO CONSIGO ACTUALIZAR DICHO CAMPO CON EL VALOR SELECCIONADO EN UN CALENDARIO.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:fechas URGENTE

Publicado por Manuel (10 intervenciones) el 07/02/2005 13:38:06
Una forma de hacerlo es poniendo el código que te envio en el evento del campo que te interese.

Se trata de recuperar el dia, mes y año de la fecha a la que le quieres sumar 1 año en tres variables, despues le sumas 1 a la variable del año y grabas el resultado en el campo que desees.

Dim AAAA As Integer
Dim MM As Integer
Dim DD As Integer

AAAA = Year(fecha1)
AAAA = AAAA + 1
MM = Month(fecha1)
DD = Day(fecha1)

Me!fecha2 = DD & "/" & MM & "/" & AAAA
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar