Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés.
Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Iniciar sesión Cerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta

Conversor de números a letras

Titulo:.zip

Conversor de números a letras

Autor:Jorge Eduardo Gallegos Torres (gatje@hotmail.com)
Lenguaje:Excel
Ejemplo de una macro en Excel para la conversión de números a letras.

Comentarios (61)Votos positivos 85%Votos negativos 15%

21/03/2006Abel Barón Gutiérrezok
Sr. Gallegos reciba usted una doble felicitación de mi parte: en primer lugar por la excente macro desarrollada para convertir números a letras y en segundo lugar por su generosidad para compartirla. Le pregunto: porqué la macro no aparece en la ventana de macros?
12/05/2006Guadalupe Leija Floresko
Felicidades.....te quedo excelene..... LA COPIA!!!!!
26/05/2006Ivanok
Esta buenisimo GRACIAS.
15/06/2006Victorok
Gracias, hacia tiempo que buscaba este codigo...
05/07/2006PLACIDO PARADA CUBIDESok
GRACIAS POR SU COLABORACION. SU TRABAJO ES MUY IMPORTANTE
25/07/2006pedroko
¿Como se ejecuta la macro? Probé con un botón y nada.
26/09/2006Danny Torres Salinasok
Gracias Jorge Gallegos, la verdad no se programar en visual pero se algo de programacion en la cual modifique algunos datos y ahora ya puedo usar esa funcion, si hubiese mas puntuacion de 10 votaria por mas, porque fue de mucha utilidad,
MUCHAS GRACIAS
29/09/2006Reinaldo Camañook
Muy bueno el conversor, pero no me funciona para 1000000.
01/10/2006Andresok
Una pregunta. pero como le puedo quitar lo q dice pesetas?... y cambiar de denominacion de moneda?

Andres
09/11/2006E Gallegosok
Guadalupe Leija Flores gleija01@hotmail.com <-- Yo soy el autor de mi conversor, lo hice yo mismo, y a ti te lo mande desde mi buzon, si quieres te mando tambien el conversor para Access, Visual, SQL, y otros, digo por si quieres tambien modificarlos y compartirlos con tu nombre y dejando a un lado al verdadero Autor. No se vale, pero cuestion de etica, Saludos.
Suerte!!!

E. Gallegos
10/12/2006Norberto Morillook
Gracias por el codigo es bastante bueno.
Excel, menu herramientas, Macros, editor de Visual Basic.
En el modulo en la funcion llamada letra por el final de la funcion modifique el nombre de la moneda de su pais ejemplo LEMPIRAS moneda de Honduras:

If Millones & Miles & Cientos & Decimales = "000000" Then
Cadena = Cadena & " " & Trim(CadCientos) & " LEMPIRAS CON" & Trim(Decimales) & "/100 CENTAVOS"
Else
Cadena = Cadena & " " & Trim(CadCientos) & " LEMPIRAS CON" & Trim(Decimales) & "/100 CENTAVOS"
End If
10/12/2006Norberto Morilloko
lo que no me gusta es que E Gallegos dice que es su codigo y que es una macro. Dos mentiras es una Function del emulador de VB que tienen Office no una MACRO y dos no es un codigo que es desarrollado por el. ABAJO ESTA COMO MODIFICARLO PARA PONER LA MONEDA DE CADA PAIS.

saludos,

Norberto.
26/01/2007Adrianako
Es verdad: no funciona para 1.000.000.-
02/04/2007leoko
Mira el código en si funciona de perlas.
El problema es que no traduce las cantidades "redondeadas" por Excel. Ejemplo
Si el total de la factura es 15.255,64. eso se redondea a 15.256. la función proporcionada no acepta el redondeo hacia una unidad mas.
Saludos
10/05/2007Fernandook
Miren independientemente de quin lo realzo el codigo esta muy bueno; y creo que en realidad esa es la idea de esta pagina; compartir.-
Un abrazo y gracias.-
18/05/2007Jorge MDok
A TODO DAR!!! ya tenia yo como 5 dias queriendo hacer uno pero solo llegue hasta numeros de 4 digitos... perfecto y facil de entender....
31/05/2007aaako
por favor esto no funciona, sean serios
13/06/2007Victorok
Muy buena macro, solo con un pequeño detalle, cuando pongo la cantidad sin decimales, me pone nada mas la cantidad, perfecto, pero por que no me pone "PESOS 00/100 M.N." me podrian ayudar?.... mi correo es victorchavez29@msn.com
24/06/2007Eddie Urrutiaok
vale loko me sirvio caleta
si es copia me da lo mismo total lo vi aca
xauuu
24/07/2007JAH625ok
Antes de sufrir algun comentario sobre la antiguedad del post alego que lo escribo porque el codigo funciona y alguien lo puede descargar y encontrarse con lo mismo.

Hay que modificar lo siguiente:

(como no se puede subrallar, lo pongo asi)

ANTES

If Millones & Miles & Cientos & Decimales = \\\"000000\\\" Then
Cadena = Cadena & \\\" \\\" & Trim(CadCientos) & \\\" LEMPIRAS CON\\\" & Trim(Decimales) & \\\"/100 CENTAVOS\\\"
Else
Cadena = Cadena & \\\" \\\" & Trim(CadCientos) & \\\" LEMPIRAS CON\\\" & Trim(Decimales) & \\\"/100 CENTAVOS\\\"
End If

DESPUES

If Millones & Miles & Cientos & Decimales = \\\"000000\\\" Then
Cadena = Cadena & \\\" \\\" & Trim(CadCientos) & \\\" LEMPIRAS CON\\\" & Trim(cadDecimales) & \\\"/100 CENTAVOS\\\"
Else
Cadena = Cadena & \\\" \\\" & Trim(CadCientos) & \\\" LEMPIRAS CON\\\" & Trim(cadDecimales) & \\\"/100 CENTAVOS\\\"
End If
24/07/2007JAH625ok
No hubiera sufrido ningun comentario puesto que el ultimo fue hace un mes y aparte que las barras sobran se han puesto al enviar el comentario. Lo que hay que cambiar es "decimal" por "caddecimal"
24/07/2007JAH625ok
Lo he hecho de memoria. el cambio es Decimales por caddecimales
06/08/2007muchas gracias!ok
Solo que le cambié algunas cosas, lo modifiqué a metros y centímetros y con minúsculas. Gracias otra vez :-)
04/09/2007Alonsook
Tengo un Problema cuando lso centavo estan en 00 NO pone al final 00/100 pesos M.N. ya le estuve buscando y no lo hace podrian ayudarme pro favor, fuera de eso todo esta genial saludos....
02/10/2007Javierok
Muy buen programa, lo feliito
16/10/2007Manuel Rojasok
Ha realizado una valoración positiva de este curso.
18/10/2007Wilson Riañook
Me parece sencillo y practico, bueno.
12/11/2007Jorge Ramirezok
Es bueno, pero creo que se puede simplificar. De hecho he visto algun otro que esta mas sencillo.
26/11/2007Manuok
Bonito. es una buena forma de insertar una funcion util.
16/01/2008manuelok
excelente, muy buen aporte.
Muchas gracias
21/01/2008Anaok
Muchas gracias por haber compartido esto, he buscado varios macros y la mayoría tiene muchos errores. En cuanto a que si se tiene .00 en los decimales, eso lo arregle desde Herramientas --> Macro --> Editor de Visual Basic, le das CONTRO+F y busca la palabra PESOS, arriba hay una parte donde menciona "00" y no tiene la parte de que escriba PESOS Y M.N. hay que ponérsela:
If Decimales = "00" Then
If Trim(CadMillones & CadMiles & CadCientos & caddecimales) = "UN" Then
Cadena = Cadena & "UNO "
Else
If Miles & Cientos = "000000" Then
Cadena = Cadena & " " & Trim(CadCientos) & " PESOS " & Trim(Decimales) & "/100 M.N."
Else
Cadena = Cadena & " " & Trim(CadCientos) & " PESOS " & Trim(Decimales) & "/100 M.N."
End If
letra = Trim(Cadena)
End If
Else
If Trim(CadMillones & CadMiles & CadCientos & caddecimales) = "UN" Then
Cadena = Cadena & "UNO " & "CON " & Trim(caddecimales)
Else
If Millones & Miles & Cientos & Decimales = "000000" Then
Cadena = Cadena & " " & Trim(CadCientos) & " PESOS " & Trim(Decimales) & "/100 M.N."
Else
Cadena = Cadena & " " & Trim(CadCientos) & " PESOS " & Trim(Decimales) & "/100 M.N."
End If

EXCELENTE!!!
13/03/2008Marco Esquivelok
Excelente macro!
27/03/2008Nubiaok
Hola, al final de toda la instrucción, sólo debo dar "guardar" y cómo empiezo a utilizarla?
Gracias
09/04/2008issacok
gracias por darnos trucos y hacernos la vida mas fasil, esta tecnica de conversor de numero a letra la busque desde hace mucho tiempo y no habia tenido respuesta gracias por su ayuda, mexico d.f.
16/04/2008sergiook
Buena la macro, sin embargo se confunde con los numeros 1.000.000, 1.000.000.000 y sucesivamente despues de cada mil millones y el mismo numero mas 100 millones. los primeros los reconoce como 0 cero y los segundos como espacio.

si te sirve para corregir.....
27/04/2008Joseok
Muchisimas gracias!, me sirvio de mucho tu codigo :-)
10/05/2008Hainer Alexander Baqueroko
Hola, te felicito por que me parece muy interesante la macro, aunque tuve un problema, no me sirve para "un millon", que puedo hacer para solucionar este inconveniente.

22/06/2008Santiagook
Gracias, esta macro esta genial... Aqui en Colombia tienen otro amigo más..... Vayan con Fé......
30/06/2008Walter TCko
Está ok, pero solo llega hasta 999,999,999 (NOVECIENTOS NOVENTA Y NUEVE MILLONES NOVECIENTOS NOVENTA Y NUEVE MIL NOVECIENTOS NOVENTA Y NUEVE)
15/07/2008Armando Ariasok
Exelente aca en chile no manejamos decimales para el dinero por lo que no tengo ningun problema y me ahorro estar escribiendo a cada rato la cifra en letras
31/07/2008juanok
na... me quiero matar... hace 2 años que vengo trabajando con precios, con numero y letra, y yo siempre lo puse a mano.. jeje.. que comando facil.. gracias
15/09/2008GILBERTO ok
Felicidades, excelente utilidad
18/11/2008JAIROok
Excelente ,, gracias por tu aporte. ´

He probado con versiones anteriores de office pero al parecer no funciona con Officce 2000 Profesional la formula, agradeceria cualquier información.

Nuevamente Gracias.
26/02/2009leook
muy bueno
12/03/2009Winston RAmirezok
Muy bien
07/05/2009Daniel Hernándezok
EXCELENTE... me parece magnifico, ya con la correción. Me resulta muy útil. Gracias por compartir esta aportación.
06/06/2009Oscarok
Excelente!!!!

Saludos
Osky
10/06/2009yacsonok
interesante la funcion
14/07/2009mauok
ESTA EXCELENTE Y ES FACIR DE PASAR A OTROS LIBORS EN EXCEL 2007 VIA VISUAL BASIC.
SOLO QUE NO SE COMO CAMBIAR EL CODIGO PARA QUE EN CASO DE QUE LA CANTIDAD NO TENGA DECIMALES DE TODAS FORMAS LE PONGA PESOS 00/100 M. N., COMO LE HAGO?
FELICIDADES¡¡¡¡¡¡¡¡¡¡¡¡¡
28/07/2009kARINAok
no se como correrla, o sea estoy trabajando en mi hoja y copio pero resulta un error, se q es mi culpa y q no se utilizarla, espero puedan ayudarm...

muy bueno este aporte
09/09/2009JCTok
Muy bueno me sirvio bastante
Muy buen archivo felicidades
30/09/2009davidok
excelente codigo, funciona a las 1000 maravillas..
08/11/2009georginako
Buen trabajo pero le encuentro las siguientes contras:
si el nº es mayor a mil millones no da error y da el valor en letras hasta las 9 cifras enteras solamente
cuando el numero es decimal debería aparecer la cantidad decimal en letras
si el nº es decimal o sea por ej. 0.25 no muestra bien 25 centavos
08/12/2009Ricardo de lunaok
justo lo que necesitaba, gracias ya podre terminar mis facturas mas rapido
10/01/2010jorgeok
Por favor podrían publicar cuál es el código fuente del macro en excel, porque no reconoce la función...
12/02/2010MARTHA BAQUEROko
la macro tiene 2 errores no identifica el millon en cifra cerrada $1,000,000 tampoco identifica $1,000,000,000

23/02/2010Ernestook
Muy buena la macro , solo hay que mejorarle, la parte de la moneda nacional.
Saludos
19/07/2013Edward Nuñezok
Gracias por la valiosa información. Quisiera saber como se ajusta el codigo para que identifique los MILES DE MILLONES 1.000'000.000- y Superiores. Saludos
26/10/2013Alberto_123ok
El problema es mucho más complejo de lo que se presenta aquí. Existen más opciones válidas por la Real Academia, la construcción del femenino y demás. Vean la aplicación que lo resuelve prácticamente todo:

http://tip.dis.ulpgc.es/numeros
01/11/2013santiagoko
algien me puede ayudar a buscar donde sale para escribir los numeros
25/05/2014carlosok
ayuda no se como utilizar el codigo y para convertir los numeros

Comenta este código fuente

Nombre
Correo (no se visualiza en la web)
Valoración del curso ok ko
Comentarios