implementando un módulo numeros a letras

Bueno aqui va una respuesta practica (buscando una explicacion practica
;)...
325 ( trescientos veinticinco bolivianos con cero centavos )
eso lo copie de un par de celdas (C28 y D28) que pertenecen a la hoja en
la que se encuentra la macro (se llama PRUEBAS)..

D28=Numeros_Letras(C28;B18;C18;D18;E18;F18;G18)

Osea que la celda D28 'llama' a la funcion numeros_letras (y su formato
de llamada) y obtiene su resultado que es como hemos visto la correcta
redacción de su valor numeral.

Esta operacion antes descrita funciona muy bien en PRUEBAS, mas no asi
si creo una nueva hoja al lado y llamo a la funcion antes mencionada,
que puedo hacer en este caso?, gracias Héctor Miguel

Héctor Miguel escribió:

Hola, Javier !

... probando ... funcion de numeros a letras ... como hacerla funcionar?.
... numeros ... aleatoriamente ... a escoger ... moneda ... centimos ... formato de escritura.
... por donde sale el "resultado" literal ... me da un campo "#numero"[...]

==> si te refieres al 'valor de error' [#¡NUM!], 'significa' que alguno/s de los argumentos 'solicitados'...
'precisamente' NO es en valor numerico [y asi 'lo requiere' la funcion en ese/os argumento/s]

-o- ¿cual es la funcion que estas usando?
-o- ¿cuales son los argumentos que 'solicita'? [y... ¿'como' se los estas 'pasando' a la funcion?
_______
Saludos,
Héctor.
MS-MVP

Javier Avila
System Adminsitrator

LEY DEL ABUELO CHARNOK. No sabrá lo que es blasfemar hasta que no
aprenda a conducir.

La formula tiene varios parametros, los cuales no es
necesario que los tome de una celda, los puedes indicar
directamente dentro de la formula. El autor de esa funcion
lo hizo así para que pudieras entender como trabaja su
finción.

Tu puedes teclear tu formula asi:
=Numeros_Letras
(C28,"Boliviano",VERDADERO,"centavo","(",")",1)

Donde C28 es la celda que contiene el valor numerico que
quieres que te convierta en texto.

El parametro 1 es el valor numerico.
El parametro 2 es el nombre de la moneda
El parametro 3 indica con VERDADERO, si quieres que la
fraccion tambien sea puesta en modo texto o FALSO si
quieres en numero.
El parametro 4 es el nombre de la fraccion.
El parametro 5 es el caracter con el que quieres que
inicie el texto.
El parametro 6 es el caracter con el que quieres que
finalice el texto.
El parametro 7: 1=TODO EN MAYUSCULAS, 2= todo en
minusculas. 3= Inicio De Cada Palabra en Mayuscula

Si bien, esta funcion esta muy interesante por todo lo que
el autor previo como necesario (la universalizo), tal vez
sea demasiado complicada para ser usada cuando no
requieras de tanto. Hay otras funciones mas sencillas que
seguramente pueden darte el resultado de lo que tu
necesitas.

Saludos
Servando Villalon

Tengo una hoja de mi libro con sus ejemplo que basado en

numeros

generados aleatoriamente el modulo me genera los nombres

dandome a

escoger el tipo de moneda el nombre de los centimos, el

tipo o formato

de escritura.
Existe un campo en el libro donde se puede escribir un

numero y otro por

donde sale el "resultado" literal, he tratado de copiar y

pegar los

formatos en otra hoja de de mi libro pero me da un

campo "#numero",

alguna ayuda oo quizá alguna sugerencia con respecto a

este tema?, gracias

saludos.

Hola, Javier !

... buscando una explicacion practica ;)...
... 325 ( trescientos veinticinco bolivianos con cero centavos )
... de un par de celdas ... la hoja en la que se encuentra la macro (se llama PRUEBAS).
... 'llama' a la funcion numeros_letras ... y obtiene ... la correcta redacción de su valor numeral.
... funciona ... en PRUEBAS, mas no ... si creo una nueva hoja al lado ... que puedo hacer en este caso?

==> 'me da la impresion' de que 'pruebas' [donde 'esta' la macro] es el nombre del libro =>NO de 'la hoja'< y que la hoja [que 'creas' al lado, y donde 'NO funciona' la funcion] 'en realidad' es... =>'otro' libro<= (???)
[basado en que] si la funcion fuera un procedimiento 'declarado' [p.e.] en el modulo [de 'clase'] de una hoja...
NO podria ser 'usada en' [o 'llamada desde'] una hoja del libro [como una funcion de hoja de calculo]
y el 'valor de error' que obtendrias es: =>#¿NOMBRE?<= [NO #numero como indicas en el mensaje]
y es 'el mismo error' [#¿NOMBRE?] que se obtiene al 'tratar de usar' una funcion 'contenida' en 'otro' libro.

si la suposicion anterior es correcta, las [posibles] soluciones serian:
1) 'llamar' a la funcion [en el 'otro' libro] haciendo una 'referencia completa' a su ubicacion [p.e.]
=Pruebas.xls!Numeros_Letras(...etc...) =>el libro [¿Pruebas.xls?] DEBERA ESTAR ABIERTO< 2) 'cambiar' la funcion [p.e.] al libro de macros 'Personal.xls' =>consulta la ayuda para ver 'el uso' de este archivo< 3) 'copiar' la funcion EN CADA LIBRO donde 'necesites' usarla [en modulos de codigo 'normales'].

si 'fume raro' :)) o la situacion es diferente :\ ... ¿comentas?
_______
Saludos,
Héctor.
MS-MVP

Hola, Servando !

Te contesto por Javier, que creo que de pronto abandono esta conversacion [...]

==> gracias por no 'dejarme colgado de la brocha' :))
[efectivamente, 'parece' que Javier... 'se fue'] <\°±°/>
-en ocasiones 'veo' como si mis respuestas pudieran 'sentirse'... ¿agresivas?- :(
[a pesar de que al re-leerlas -y si fuera el caso- trato de 'suavizarlas'] :)
una [¿mala?] costumbre que tengo de 'profundizar' en el analisis de la consulta [y propuestas]
¿sera este un caso???

==> en cuanto a la funcion... la conozco
[de hecho, la 'incluyo' como posibilidades en cada consulta acerca de 'tal' necesidad]
[dale un 'vistazo' a tu buzon] ;)

Saludos,
Héctor.

Bueno, disculpas en primer lugar por no haber asistidos a estas
explicaciones tan simples y efectivas, gracias por eso.

Les cuento que hice funcionar la funcion numeros_letras copiando la hoja
y el modulo en otro libro.

Me he topado con un nuevo problema: el formato de salida

Tengo un resultado asi:
325 ( trescientos veinticinco bolivianos con cero centavos )

Será posible cambiar el "orden" de las palabras?... algo asi digamos:

325 (treciendots veninticinco 00/100 bolivianos)

He estado tratando de incursionar en el codigo del modulo VBA pero
infructuosamente ya no tengo experciencia, creo que al principio está el
formato de salida o no?:

Public Function Numeros_Letras(ByVal Numero As Double, _
ByVal Moneda As String, _
Optional Fraccion_Letras As Boolean = False, _
Optional Fraccion As String = "", _
Optional Texto_Inicial As String = "", _
Optional Texto_Final As String = "", _
Optional Estilo As Integer = 1) As String


Traté de cambiar el orden de los outputs pero me da errores variados,
bueno espero sugerencias caballeros, ahora ya tengo internet y voy a
estar mas seguido molestando jeje, gracias


Héctor Miguel wrote:

Hola, Servando !

Te contesto por Javier, que creo que de pronto abandono esta conversacion [...]

==> gracias por no 'dejarme colgado de la brocha' :))
[efectivamente, 'parece' que Javier... 'se fue'] <\°±°/>
-en ocasiones 'veo' como si mis respuestas pudieran 'sentirse'... ¿agresivas?- :(
[a pesar de que al re-leerlas -y si fuera el caso- trato de 'suavizarlas'] :)
una [¿mala?] costumbre que tengo de 'profundizar' en el analisis de la consulta [y propuestas]
¿sera este un caso???

==> en cuanto a la funcion... la conozco
[de hecho, la 'incluyo' como posibilidades en cada consulta acerca de 'tal' necesidad]
[dale un 'vistazo' a tu buzon] ;)

Saludos,
Héctor.

Javier Avila
System Adminsitrator

Si hay más de una persona a la que se le pueda echar la culpa de un
error de cálculo, la culpa no será de nadie.