Convertir, transcribir números en letras con y sin decimales en Excel Código original en Macro en Excel, se debe modificar para que exprese solo números Macro en Excel PesosMN En el código original la función es PesosMN, yo la cambie a NUMLETRAS. La formulación completa en el Excel quedaría así:
=SI(MAYOR.O.IGUAL(A2;1999999999,99);"NO SE PUEDE EXPRESAR CIFRAS MAYORES A 1.999.999.999,99";SI(NUMLETRAS(A2)=" ";CONCATENAR("CETO CON ";SI(EXTRAE(TEXTO((A2-REDONDEAR.MENOS(A2;0))*100;"00");1;1)="0";CONCATENAR("CERO";NUMLETRAS(TEXTO((A2-REDONDEAR.MENOS(A2;0))*100;"00")));NUMLETRAS(TEXTO((A2-REDONDEAR.MENOS(A2;0))*100;"00"))));SI(NUMLETRAS(TEXTO((A2-REDONDEAR.MENOS(A2;0))*100;"00"))=" ";NUMLETRAS(A2);CONCATENAR(NUMLETRAS(A2);"CON ";SI(EXTRAE(TEXTO((A2-REDONDEAR.MENOS(A2;0))*100;"00");1;1)="0";CONCATENAR("CERO";NUMLETRAS(TEXTO((A2-REDONDEAR.MENOS(A2;0))*100;"00")));NUMLETRAS(TEXTO((A2-REDONDEAR.MENOS(A2;0))*100;"00")))))))
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Convertir, transcribir números en letras con y sin decimales en Excel
Código original en Macro en Excel, se debe modificar para que exprese solo números
Macro en Excel PesosMN
En el código original la función es PesosMN, yo la cambie a NUMLETRAS. La formulación completa en el Excel quedaría así:
=SI(MAYOR.O.IGUAL(A2;1999999999,99);"NO SE PUEDE EXPRESAR CIFRAS MAYORES A 1.999.999.999,99";SI(NUMLETRAS(A2)=" ";CONCATENAR("CETO CON ";SI(EXTRAE(TEXTO((A2-REDONDEAR.MENOS(A2;0))*100;"00");1;1)="0";CONCATENAR("CERO";NUMLETRAS(TEXTO((A2-REDONDEAR.MENOS(A2;0))*100;"00")));NUMLETRAS(TEXTO((A2-REDONDEAR.MENOS(A2;0))*100;"00"))));SI(NUMLETRAS(TEXTO((A2-REDONDEAR.MENOS(A2;0))*100;"00"))=" ";NUMLETRAS(A2);CONCATENAR(NUMLETRAS(A2);"CON ";SI(EXTRAE(TEXTO((A2-REDONDEAR.MENOS(A2;0))*100;"00");1;1)="0";CONCATENAR("CERO";NUMLETRAS(TEXTO((A2-REDONDEAR.MENOS(A2;0))*100;"00")));NUMLETRAS(TEXTO((A2-REDONDEAR.MENOS(A2;0))*100;"00")))))))