Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Calculo entre fechas

69 views
Skip to first unread message

Gema

unread,
May 8, 2003, 8:41:13 PM5/8/03
to
Hola amigos

Podra existir una funcion o procedimiento para conseguir
lo siguiente

Tengo un campo fecha Fec_cierre

Se requiere que en otros campos sucesivamente se
incremente el mes hasta 12 meses, partiendo de la
Fec_cierre, esto lo logro con la siguiente funcion:

=Formato$(AgregFecha("m",(1),[Fec_Cierre]),"mmm"" -""aa")
=Formato$(AgregFecha("m",(2),[Fec_Cierre]),"mmm"" -""aa")
=Formato$(AgregFecha("m",(3),[Fec_Cierre]),"mmm"" -""aa")

y asi sucesivamente llego a lo siguiente:


May-03 Jun-03 Jul-03 Ago-03 Sep-03 Oct-03 Nov-03
Dic-03 Ene-03 Feb-03 Mar-03 Abr-03

Esto funciona muy bien hasta cuando se cambia de año,
notaran que a partir del mes 9 debe mostrar Ene-04

Ósea debería quedar así:

May-03 Jun-03 Jul-03 Ago-03 Sep-03 Oct-03 Nov-03
Dic-03 Ene-04 Feb-04 Mar-04 Abr-04


Muchas gracias

GEMA
COLOMBIA

E. Feijoo

unread,
May 8, 2003, 9:46:10 PM5/8/03
to
Hola te pego la consulta y el resultado en la ventana de inmediato ( acces 97 y 2000)
..............................................
?format (dateadd("m",12,now()),"mmmm - yy")
mayo - 04
..................................

¿ son necesarios los paréntesis en el numero y las comillas en el formato ?

Inténtalo así
=Formato$(AgregFecha("m",1,[Fec_Cierre]),"mmm-aa")

Un saludo E. Feijoo
P.D.
He pegado tu expresion en la ventana de inmediato y me da el resultado correcto

"Gema" <gloria_...@hotmail.com> escribió en el mensaje news:07bb01c315c3$b1a655a0$3001...@phx.gbl...

Gema

unread,
May 9, 2003, 11:39:33 AM5/9/03
to
Hola

Ante todo muchas gracias por responderme, pero sigo con
mi duda,

requiero que incremente el mes y lo hago de acuerdo a
esta funcion

=Formato$(AgregFecha("m",1,[Fec_Cierre]),"mmm-aa")


Con tu funcion solo cambio el año:

=format (dateadd("m",12,now()),"mmmm - yy")


Como hago que a la vez en la misma funcion cambien el año


GRACIAS

Emilio

unread,
May 9, 2003, 2:14:04 PM5/9/03
to
Hola Gema

prueba esto en la ventana Inmediato, a mi me funciona bien
for i=0 to 11: ?format(dateserial(year(date),month(date)+i,1), "mm/yyyy"):next
lo podras transformar facilemente o crear una función con ello

Saludos a todos

Emilio

"Gema" <gloria_...@hotmail.com> escribió en el mensaje news:03b301c31641$3031ef10$3301...@phx.gbl...

E. Feijoo

unread,
May 9, 2003, 3:59:46 PM5/9/03
to
Elemental Gema, si le pones '12' le sumas doce meses, esto es, un año ( y tu te quejabas que antes no lo cambiaba).
Un saludo E. Feijoo

"Gema" <gloria_...@hotmail.com> escribió en el mensaje news:03b301c31641$3031ef10$3301...@phx.gbl...

0 new messages