Tema: Formato de números en excel
Ver Mensaje Individual
  #18 (permalink)  
Antiguo 20/09/2007, 01:36
Avatar de mrocf
mrocf
 
Fecha de Ingreso: marzo-2007
Ubicación: Bs.As.
Mensajes: 1.103
Antigüedad: 17 años, 9 meses
Puntos: 88
De acuerdo Formato de números en excel
Utiliza la macro que está en: http://savefile.com/files/1051131

Del código:
Código: 
    If Cantidad < 0 Then
        EnLetras = "PESOS Menos "
        Cantidad = Abs(Cantidad)
    Else
        EnLetras = "PESOS "
    End If
elimina las dos líneas que he resaltado en "rojo".

Y del código:
Código: 
Centavos:
        Resto = WorksheetFunction.Round(100 * Resto, 0)
        EnLetras = Trim(EnLetras) + " CON " + Format(Resto, "00") + "/100"
también elimina lo que está en rojo.

Finalmente (y ya en Excel), la fórmula:
= EnLetras(ENTERO(A2)) & " coma " & EnLetras( 100*(A2-ENTERO(A2)) )

hace lo que estás buscando.

Saludos