Para excel
fuente:
http://es.wikibooks.org/wiki/Algoritmo_para_obtener_la_letra_del_NIF
Excel
=CONCATENAR(A1;MED("TRWAGMYFPDXBNJZSQVHLCKE";RESTO(A1;23)+1;1)) =CONCATENAR(A1;EXTRAE("TRWAGMYFPDXBNJZSQVHLCKE";RESIDUO(A1;23)+1;1)) =CONCATENATE(A1,MID("TRWAGMYFPDXBNJZSQVHLCKE",MOD(A1,23)+1,1)) En calc (OpenOffice) =CONCATENAR(A1,MID("TRWAGMYFPDXBNJZSQVHLCKE",RESIDUO(A1,23)+1,1))
fuente:
http://es.wikibooks.org/wiki/Algoritmo_para_obtener_la_letra_del_NIF
Comentarios
Publicar un comentario