Calcular cantidad de meses entre 2 fechas

31/03/2006 - 03:50 por Jorge Viotti | Informe spam

Tengo una celda con la fecha de hoy ( =Hoy() ) y otra con una fecha
anterior
Necesito calcular la cantidad de meses que hay entre esas 2 fechas
Alguien puede explicarme como se hace?
No encontre ninguna funcion salvo calcular la cantidad de dias (dias369) y
dividirlo por 30, pero no es exacta.
Encontre una macro que lo hace pero no tengo ni idea como se incorpora a una
celda.

MACRO:

Sub Date_MonthsBetweenDates()
Dim dBeginDate As Date
Dim dEndDate As Date
Dim intMonths As Integer
' Beginning date.
dBeginDate = DateValue("1/1/1993")
' Ending Date.
dEndDate = DateValue("2/1/1993")
' Calculate number of months between dates.
intMonths = ((Year(dEndDate) - Year(dBeginDate)) * 12) + _
Month(dEndDate) - Month(dBeginDate)
' Display number of months.
MsgBox Str$(intMonths) & " month(s)"
End Sub

Siga el debate

2 respuestas

Tengo una respuesta

Preguntas similare

Calcular cantidad de meses entre 2 fechas

Leer las respuestas

#1 Héctor Miguel

31/03/2006 - 08:14 | Informe spam

hola, Jorge !

Tengo una celda con la fecha de hoy ( =Hoy() ) y otra con una fecha anterior
Necesito calcular la cantidad de meses que hay entre esas 2 fechas
Alguien puede explicarme como se hace?
No encontre ninguna funcion salvo calcular la cantidad de dias (dias369) y dividirlo por 30, pero no es exacta.
Encontre una macro que lo hace pero no tengo ni idea como se incorpora a una celda [...]

si no es 'indispensable' el uso de alguna macro... prueba a usar la funcion de hoja de calculo:
=sifecha(Fecha_Inicial,Fecha_Final,"Unidad")

para el argumento 'unidad' es necesario que utilices las siguientes 'convenciones'...
"y" = A#os completos
"m" = Meses completos
"d" =´Dias completos
"ym" = Meses (omitiendo los a#os)
"md" = Días (omitiendo los a#os y meses)

y toma en cuenta que mi sistema usa como separador de argumentos a la coma ',' NO al punto y coma ';' :D

saludos,
hector.

p.d. si no encuentras 'referencias' a la funcion sifecha... revisa las conversaciones en: -> http://tinyurl.com/es67t

Responder a este mensaje

#2 YSL65

01/04/2006 - 19:15 | Informe spam

Buenisimo!!!
Esta no la tenía, muchas gracias HECTOR!!!!

_______________________ Dr. Jorge E. Viotti TE: 03541 - 431483 Movil: 0351 -
155-052441 (SMS) Este mensaje y sus anexos son confidenciales y para el uso
exclusivo por parte del titular de la dirección de correo electrónico a la
que esta dirigido, puede contener información amparada por el secreto
profesional cuyo uso inadecuado puede derivar en responsabilidad civil para
el usuario o configurar los delitos previstos en los artículos 153 a 157 del
Código Penal, por lo que su contenido no debe ser copiado, enviado, revelado
o utilizado en cualquier forma no autorizada expresamente por el emisor. En
caso de que Ud. no sea el destinatario especificado en este mensaje o
persona debidamente autorizada por el mismo, por favor informe tal situación
reenviando el mensaje y/o sus anexos a - El
emisor no acepta responsabilidad alguna por errores u omisiones contenidos
en este mensaje o sus anexos, ni garantiza la seguridad, exactitud de lo
transmitido por este medio debido a que el mismo puede ser objeto de
intercepción, alteración, demora, perdida, contener virus informáticos u
otras anomalías.
***************************************************************************************************************************************************************************
"Héctor Miguel" escribió en el mensaje
news:

hola, Jorge !

Tengo una celda con la fecha de hoy ( =Hoy() ) y otra con una fecha
anterior
Necesito calcular la cantidad de meses que hay entre esas 2 fechas
Alguien puede explicarme como se hace?
No encontre ninguna funcion salvo calcular la cantidad de dias (dias369)
y dividirlo por 30, pero no es exacta.
Encontre una macro que lo hace pero no tengo ni idea como se incorpora a
una celda [...]

si no es 'indispensable' el uso de alguna macro... prueba a usar la
funcion de hoja de calculo:
=sifecha(Fecha_Inicial,Fecha_Final,"Unidad")

para el argumento 'unidad' es necesario que utilices las siguientes
'convenciones'...
"y" = A#os completos
"m" = Meses completos
"d" =´Dias completos
"ym" = Meses (omitiendo los a#os)
"md" = Días (omitiendo los a#os y meses)

y toma en cuenta que mi sistema usa como separador de argumentos a la coma
',' NO al punto y coma ';' :D

saludos,
hector.

p.d. si no encuentras 'referencias' a la funcion sifecha... revisa las
conversaciones en: -> http://tinyurl.com/es67t

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida