Se me ocurre una forma, aunque no se si será la más indicada:
En la celda del "AÑO" cambias la fórmula por
=SI(ENTERO(MID(E9;1;2))>70;19&MID(E9;1;2);20&MID(E9;1;2))"
que básicamente lo que hace es añadir el principio del año. Si es mayor de
70 añade 19 quedando 1997 0 1971 por ejemplo, y si es menor añade 20
quedando 2005 por ejemplo.
Después ya sólo te queda restar el año de nacimiento al año actual con:
=SI(MES(AHORA())>=ENTERO(E12);SI(DÍA(AHORA())>=ENTERO(E11);RESIDUO(AÑO(AHORA());E13);RESIDUO(AÑO(AHORA());E13)-1);RESIDUO(AÑO(AHORA());E13)-1)
lo cual comprueba si el mes y el día son iguales o superiores a la fecha de
nacimiento, y si no le resta un año.
Te adjunto una hoja de prueba por si quieres verlo en acción. Un saldo!!
PDTA: No se realmente cómo irá lo del carnet ese, pero se supone que el año
lo coge con las dos primeras cifras y me pregunto: ¿Qué pasa si el año es
2003?, ¿sería 03 o 3?, es que la diferencia es a la hora de coger el año
con el MID(E9;1;2), si sólo es 3 cogería una cifra más de las necesarias.
El 25 de febrero de 2014, 15:34, Carlos - Informatico
<carlos@servchg.co.cu>escribió:
En una lista de correo me encontré con esta pregunta y me resultó
interesante buscar una respuesta, aquí la dejo para ver si alguien puede
ayudar a esa persona.
En una hoja de cálculo Cal, se tienen los datos de una persona....
-tenemos el numero de carnet de identidad en la celda E9......"97050132579"
-podemos sacar la fecha de nacimiento completa,
desglosada en otras 3 celdas............SEXO........
=SI((RESIDUO((VALOR(MID(E9;10;1)));2));"F";"M")
.......................DIA..........=MID(E9;5;2)
.......................MES.........=MID(E9;3;2)
.......................AÑO.........=MID(E9;1;2)
-La pregunta..... Como obtener la edad (actual) del individuo en otra
celda..(teniendo uso de la fecha actual de la PC)...?
Saludos
Carlos
--
--------------------------------------------------
Lic. Carlos Parra Zaldivar
Esp.Informático
Direc. Prov. Servicios Comunales
Holguín
Teléfonos: 24-452518
24-424088-114
24-421232-114
e-mail: carlos@servchg.co.cu
web: http://carlosp.cubava.cu
--------------------------------------------------
--
Para instrucciones sobre darse de baja envíe un mensaje a:
users+unsubscribe@es.libreoffice.org
¿Problemas? http://es.libreoffice.org/asistencia/listas-de-correo/
como-darse-de-baja/
Guías para envío + más: http://wiki.documentfoundation.org/Netiquette/es
Archivo de la lista: http://listarchives.libreoffice.org/es/users/
Todos los mensajes enviados a esta lista serán archivados públicamente y
no pueden ser eliminados
--
Para instrucciones sobre darse de baja envíe un mensaje a: users+unsubscribe@es.libreoffice.org
¿Problemas? http://es.libreoffice.org/asistencia/listas-de-correo/como-darse-de-baja/
Guías para envío + más: http://wiki.documentfoundation.org/Netiquette/es
Archivo de la lista: http://listarchives.libreoffice.org/es/users/
Todos los mensajes enviados a esta lista serán archivados públicamente y no pueden ser eliminados
Context
Privacy Policy |
Impressum (Legal Info) |
Copyright information: Unless otherwise specified, all text and images
on this website are licensed under the
Creative Commons Attribution-Share Alike 3.0 License.
This does not include the source code of LibreOffice, which is
licensed under the Mozilla Public License (
MPLv2).
"LibreOffice" and "The Document Foundation" are
registered trademarks of their corresponding registered owners or are
in actual use as trademarks in one or more countries. Their respective
logos and icons are also subject to international copyright laws. Use
thereof is explained in our
trademark policy.