Calcular el tiempo (En dias, mes o años) entre dos fechas

Preparando y aprendiendo lo que es la depreciación en un reporte que tuve que presentar en el trabajo, me di con la sorpresa que necesitaba contabilizar los meses el bien tiene para calcular su valor depreciado a la fecha y buscándo por la web me topé con un blog (http://trucosexcel.blogspot.com) el cual me ayudo con lo que necesitaba y encontré la función SIFECHA() y me di cuenta que nunca la hubiera encontrado si no fuera por este blog ya que el Excel no te sugiere esta formular en su combo de opciones.

Normalmente no publico los enlaces de la información que encuentro y redacto en mi blog, pero esta vez si lo haré ya que estaré utilizando un archivo que esta subido en su blog y realmente me da flojera volver a crearlo. Sin hacerlos esperar aquí la explicación.

Para comenzar la explicación deben descargar el siguiente archivo de excel para poder ver la formula y conversar mejor enlace (archivoExcel con función SIFECHA()), ahora si manos a la obra, encontrarán dos hojas en este archivo y cada hoja explicamos a continuación:

Hoja1

=sifecha(fecha inicial;fecha final;tipo)

donde:

tipo es el tipo de respuesta que da la función, y puede ser:

• y Calcula el número de años transcurridos
• m Calcula el número de meses transcurridos
• d Calcula el número de días transcurridos. Equivale a restar ambas fechas
• ym Calcula los meses sin considerar los años enteros transcurridos
• md Calcula los días sin considerar los años y meses enteros transcurridos

Hoja2

En ésta hoja hemos creado unos controles numéricos que el usuario puede ir modificando para ir aumentando o disminuyendo los años, meses y días.

Podemos calcular la edad en años de una persona, o podemos calcular la antiguedad en la empresa de un trabajador.

Se puede detectar un error de la fórmula tal y como se ve en la celda C7, que aparece de color rojo cuando difiere de la celda D18.

Otro aspecto curioso de esta hoja es la fórmula programada:

=DisplayCellFormula(Celda)

que nos da la fórmula de la celda que se indique.

Código:

'Función que muestra la fórmula de una celda
'Devuelve la fórmula que contiene una celda en lenguaje local
'Si se quita la palabra 'Local' devuelve la fórmula en inglés.
Function DisplayCellFormula(Celda As Range) As String
DisplayCellFormula = Celda.FormulaLocal
End Function

Y eso sería todo caso resuelto, por que escondería esta función Excel??

Linkferencia:

http://trucosexcel.blogspot.com

http://excelavanzado.com/excel.htm

Advertisement