cambio de idioma en resultado de funcion textbath de excell

hola, alexandra !

... no se que hice, que ahora la celda en lugar del resultado ejem. 1000 = mil pesos me regresa =EnLetras(k19,4) [...]

[probablemente] la celda donde usas la funcion tiene un formato personalizado de 'Texto' -?-
prueba aplicando un formato numerico mas 'acorde', edita la celda y pulsa {enter} ;)

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

mil gracias otra vez, no cabe duda que el que sabe sabe, jeje. me ha servido
muchisimo tu ayuda, ahora solo queda la otra duda que te planteaba. Si hay
alguna forma de que la fórmula quede fija para cualquier libro, y no tener
que estar creando módulos cada que abro un libro diferente
=)
Gracias

"Héctor Miguel" escribió:

hola, alexandra !

> ... no se que hice, que ahora la celda en lugar del resultado ejem. 1000 = mil pesos me regresa =EnLetras(k19,4) [...]

[probablemente] la celda donde usas la funcion tiene un formato personalizado de 'Texto' -?-
prueba aplicando un formato numerico mas 'acorde', edita la celda y pulsa {enter} ;)

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

hola, alexandra !

... solo queda la otra duda que te planteaba
... alguna forma de que la formula quede fija para cualquier libro
y no tener que estar creando modulos cada que abro un libro diferente

para que un procedimiento [sub o funcion] este 'disponible' para cualquier libro [sin tener que copiarla a cada libro]
es necesario que el codigo este en el libro de macros 'Personal.xls' [o en algun complemento o 'Add-In']
en cualquier 'caso' [personal o add-in]... 'tendras que cargar' con el archivo a otra/s pc/s que 'usen' la/s macro/s
de otra manera [NO 'presente' el archvo CON el/los procedimiento/s sub o funcion] NO seran 'reconocidas' por excel

con relacion al 'libro de macros personales': ->'Personal.xls'<-
1) su 'objetivo' es que todos 'sus' procedimientos esten disponibles para todos los libros [durante la sesion]
[a menos que los declares como 'Private' o en el modulo que los contiene pongas la declaracion 'Option Private Module']
2) requisito INDISPENSABLE es que LA VENTANA del archivo este oculta
=> NO 'confundir' con el atributo oculto de un archivo en el sistema operativo <3) [posiblemente] 'perderas' la presentacion de un libro en blanco al 'arrancar' [solamente] excel
4) si lo 'tienes que' trasladar/copiar A OTRAS pc's... PREGUNTA PRIMERO si el usuario de la pc usa 'su' personal.xls

si no has 'generado' tu libro de macros 'personales'... lo puedes crear [p.e. la forma mas 'simple' es:]
'generando' una [nueva?] macro ... => herramientas -> macro -> grabar nueva macro... <y en en las opciones de la macro => Guardar macro en: Libro de macros personal <la aplicacion [excel] 'se encargara' de grabarlo en el directorio de inicio.
editas [o borras... o sustituyes] la macro grabada y 'pones' ahi el codigo del procedimiento [sub o funcion]
[o 'vas' agregando los que consideres 'de uso comun o frecuente]

si cualquier duda... comentas ?
saludos,
hector.

En verdad no sabes como me has ayudado hector. me encantaría saber tantas
cosas de exel, jeje. me ví un poco en dificultades porque nunca había
utilizado las macros y con eso del nuevo office 2007 se hace más dificil
porque de aqui a que encuentras todo, uff. pero ya pude crear mi macro
personal y no sabes como te agradezco. Ahora te molesto con otra cosilla,
fijate que se me dió el caso de una cantidad de 200 pesos cerrados, y el
resultado en lugar de darme "dos cientos pesos 00/100" me lanza "ciento
noventa y nueve pesos 100/100". como podría resolver este problemita??

=) gracias nuevamente

"Héctor Miguel" escribió:

hola, alexandra !

> ... solo queda la otra duda que te planteaba
> ... alguna forma de que la formula quede fija para cualquier libro
> y no tener que estar creando modulos cada que abro un libro diferente

para que un procedimiento [sub o funcion] este 'disponible' para cualquier libro [sin tener que copiarla a cada libro]
es necesario que el codigo este en el libro de macros 'Personal.xls' [o en algun complemento o 'Add-In']
en cualquier 'caso' [personal o add-in]... 'tendras que cargar' con el archivo a otra/s pc/s que 'usen' la/s macro/s
de otra manera [NO 'presente' el archvo CON el/los procedimiento/s sub o funcion] NO seran 'reconocidas' por excel

con relacion al 'libro de macros personales': ->'Personal.xls'<-
1) su 'objetivo' es que todos 'sus' procedimientos esten disponibles para todos los libros [durante la sesion]
[a menos que los declares como 'Private' o en el modulo que los contiene pongas la declaracion 'Option Private Module']
2) requisito INDISPENSABLE es que LA VENTANA del archivo este oculta
=> NO 'confundir' con el atributo oculto de un archivo en el sistema operativo <> 3) [posiblemente] 'perderas' la presentacion de un libro en blanco al 'arrancar' [solamente] excel
4) si lo 'tienes que' trasladar/copiar A OTRAS pc's... PREGUNTA PRIMERO si el usuario de la pc usa 'su' personal.xls

si no has 'generado' tu libro de macros 'personales'... lo puedes crear [p.e. la forma mas 'simple' es:]
'generando' una [nueva?] macro ... => herramientas -> macro -> grabar nueva macro... <> y en en las opciones de la macro => Guardar macro en: Libro de macros personal <> la aplicacion [excel] 'se encargara' de grabarlo en el directorio de inicio.
editas [o borras... o sustituyes] la macro grabada y 'pones' ahi el codigo del procedimiento [sub o funcion]
[o 'vas' agregando los que consideres 'de uso comun o frecuente]

si cualquier duda... comentas ?
saludos,
hector.

hola, alexandra !

... otra cosilla, fijate que se me dio el caso de una cantidad de 200 pesos cerrados
y el resultado en lugar de darme "dos cientos pesos 00/100"
me lanza "ciento noventa y nueve pesos 100/100".
como podria resolver este problemita??

[probablemente] los 200 pesos que *ves* como 'cerrados' se deba a que la celda tiene formato SIN decimales
-> cuando su valor *real* es +/- 199.995 <= mayor a 4 a partir de la tercer posicion decimal -?-
alguna formula ? [son 'cosas' del punto flotante desde las operaciones aritmeticas basicas] :))

para solucionar esta eventualidad, y mostrar el valor *real* del resultado: -> 199.99
-> modifica la linea 7 del codigo...
de: -> Cents = Application.Round(Abs(Valor) - Int(Abs(Valor)), 2) * 100
a: -> Cents = Mid(Abs(Valor) - Int(Abs(Valor)), 3, 2)
OJO: obviamente seria necesario que la celda tenga un formato que *muestre* -al menos- dos decimales
Y/o... 'forzar' [el resultado de] la formula en esa/s celda/s a dos decimales p.e. =redondear(tu_formula,2)

si no deseas *trabajar* con las decimales...
-> seria necesario modificar el codigo, eliminando las referencias a las fracciones [Cents/Fracs]...
y *trabajar* las cantidades usando en lugar de enteros, los valores *redondeados* [a 0 decimales] -?-

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.