Numeros en ingles

23/12/2005 - 18:22 por Raul | Informe spam
Alguien que me ayude, quiero poner en una celda un numero y quiero que se
vincule con otra celda pero que aqui me aparezca el numero en ingles

Preguntas similare

Leer las respuestas

#6 Héctor Miguel
29/12/2005 - 00:13 | Informe spam
hola, Raul !

... el numero no es muy grande, considero que lo que necesito es menor de 1000 y ademas son numeros enteros.



el siguiente procedimiento requiere definir 4 nombres con las matrices de los numeros en ingles...
y una formula 'kilometrica' [+/- 350 caracteres] :-( pero [probablemente] lo encontraras 'rapida' y 'versatil' :))
para 'traducir' numeros enteros en ingles de 0 a 999:

solo toma en cuenta que mi sistema usa como separador de argumentos a la coma ',' NO al punto y coma ';' :D
y que 'mi' separador de filas en matrices constantes ES la barra inversa '\' [tu configuracion regional pudiera usar otro -?-

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.
=1) define los siguientes 4 nombres [menu] insertar / nombre / definir...
nombre: se rfiere a:
_1 ={""\"one"\"two"\"three"\"four"\"five"\"six"\"seven"\"eight"\"nine"}
_2 ={"ten"\"eleven"\"twelve"}
_3 ={""\""\""\"thir"\"four"\"fif"\"six"\"seven"\"eigh"\"nine"}&"teen"
_4 ={"twen"\"thir"\"four"\"fif"\"six"\"seven"\"eigh"\"nine"}&"ty "

2) suponiendo que el resultato de la multiplicacion lo obtienes en la celda 'A1'... usa la siguiente -kilometrica' formula:
OJO: que debe ser en una sola linea...
=si(a1>0,indice(_1,1+izquierda(texto(derecha(entero(a1),3),"000"),1))&si(--texto(derecha(entero(a1),3),"000")>99," hundred ","")
&si(--derecha(a1,2)>19,indice(_4,extrae(texto(derecha(entero(a1),3),"000"),2,1)-1)
&indice(_1,1+derecha(a1,1)),si(--derecha(a1,2)>9,indice(si(--derecha(a1,2)>12,_3,_2),1+derecha(a1,1)),indice(_1,1+derecha(a1,1)))),"zero")

si estas seguro de que nunca excederas de 3 digitos en el resultado, puedes 'ahorrar' +/- 35 caracteres modificando en la formula:
de -> &si(--texto(derecha(entero(a1),3),"000")>99," hundred ","")
a -> &si(a1>99," hundred ","")

3) [personamente] 'prefiero' manejar todos los textos en minusculas y si tu requieres un 'formato de salida' diferente... prueba p.e.
=nompropio(<aqui_la_formula>) o... =mayusc(<aqui_la_formula>)

nota: si requires 'segmentos adicionales' [mas de 3 digitos / 0-999] sera necesario aumentar 'pasos intermedios'
y seguramente agregar nombres-formula-funciones que [definitivamente] volveran 'de riesgo' la conversion si se copia a otros libros :-(( <= OJO
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida