Problema numero a letras

Te envío código a tu mail para que le eches un vistazo (si no es tu
verdadero mail el que tienes puesto en las propiedades
dímelo)

Si alguien lo quiere que lo diga

Puntualizar que el código no es mío lo he descargado del grupo hace bastante
solo he añadido alguna pequeña modificación

Realizado por: Alejandro Gómez
Modificado por: Alexander Cedeño
Modificado después por Antonio Martínez 6/03

"Antonio." escribió en el mensaje
news:e#

Hola amigos. Siento ser repetitivo en este tema, pero no lo consigo. He
buscado en la red todas las funciones que se relacionan con el tema y no
consigo lo que necesito.

Me gustaria hacer lo siguiente:
A1= 1000,50
Y que en la celda A2 me pusiera: MIL EUROS CON CINCUENTA CENTIMOS.

La verdad es que ahi muchos codigos pèro no soy ningun experto y no se

hacer

una mezcla para que me salga lño que deseo.

Espero vuestra ayuda.
Saludos desde BCN

Hola, Antonio Martínez !

Te envío codigo a tu mail para que le eches un vistazo [...]
Si alguien lo quiere que lo diga [...]

==> Te agradecere una copia para mi coleccion :-))
(solo quita de la direccion que aparece el "NO...SPAM...PLS")

_______
Saludos,
Héctor.
MS-MVP

Tienes razón, el código falla en el caso que comentas. Lo he modificado y parece que ahora lo hace bien, pero he decidido enviártelo a tu buzón mejor que volver a subir al grupo otros 20 Kbs. Te acabo de poner un mensaje.
Un saludo.


Fernando Arroyo
MS MVP - Excel


"Antonio." escribió en el mensaje news:

Este modulo es lo que buscaba, aunque a mi entenser tiene un pequeño error,
que yo no se remediar, y es qque cuando la cantidad a convertir es 1000, lo
convierte de la siguiente forma: UN MIL EUROS y creo que deberia ser MIL
EUROS. Si alguien sabe como solucionarlo estare abierto a vuestras
opiniones.

Gracias por todo y saludos desde BCN.

"Fernando Arroyo" escribió en el mensaje
news:
Te adjunto el código que he usado alguna vez. Está escrito por "Guille",
aunque lo retoqué un poco para adaptarlo a Excel. Para que funcione tendrás
que pegarlo en un módulo creado por ti (Insertar->Módulo, estando en el
editor de VBA). Para lo que necesitas, la sintaxis sería:

=MAYUSC(numero2letra(Celda;0;2,2;"euro";"céntimo"))

donde Celda es la dirección de la celda o un rango con nombre que se refiere
a ella.
Un saludo.


Fernando Arroyo
MS MVP - Excel

[...]