Formato de miles en un textbox VBA (con problemas)

27/04/2007 - 09:06 por Don Juan | Informe spam
Hola a todos.
Hace unos días David Ortiz contestó a mi pregunta de cómo mostrar la
separación de miles en un textbox, y funcionó, pero ahora el probema es que
cuando el valor es igual a 7'133.00 no puedo sumarlo a otro valor, es decir,
solo coge el primer valor antes del separador que es 7.
Cómo puedo obtener 7133 de mi valor que está en el textbox como string?

Gracias

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
28/04/2007 - 07:39 | Informe spam
hola, Juan !

Hace unos dias David Ortiz contesto a mi pregunta de como mostrar la separacion de miles en un textbox, y funciono,
pero ahora el probema es que cuando el valor es igual a 7'133.00 no puedo sumarlo a otro valor
es decir, solo coge el primer valor antes del separador que es 7.
Como puedo obtener 7133 de mi valor que está en el textbox como string?



OJO: si el apostrofo es 'realmente' el separador de miles 'valido' para tu configuracion regional...
prueba con las funciones de conversion de tipos de datos de vba [p.e.]:

MsgBox CCur(TextBox1) & vbCr & _
CLng(TextBox1) & vbCr & _
CDbl(TextBox1) & vbCr & _
CSng(TextBox1)

en caso contrario, necesitaras primero 'limpiar' de caracteres no validos el contenido del textbox :-((

saludos,
hector.
Respuesta Responder a este mensaje
#2 Don Juan
30/04/2007 - 13:27 | Informe spam
Gracias voy a ponerlo en práctica.

"Héctor Miguel" wrote in message
news:
hola, Juan !

Hace unos dias David Ortiz contesto a mi pregunta de como mostrar la
separacion de miles en un textbox, y funciono,
pero ahora el probema es que cuando el valor es igual a 7'133.00 no puedo
sumarlo a otro valor
es decir, solo coge el primer valor antes del separador que es 7.
Como puedo obtener 7133 de mi valor que está en el textbox como string?



OJO: si el apostrofo es 'realmente' el separador de miles 'valido' para tu
configuracion regional...
prueba con las funciones de conversion de tipos de datos de vba [p.e.]:

MsgBox CCur(TextBox1) & vbCr & _
CLng(TextBox1) & vbCr & _
CDbl(TextBox1) & vbCr & _
CSng(TextBox1)

en caso contrario, necesitaras primero 'limpiar' de caracteres no validos
el contenido del textbox :-((

saludos,
hector.

email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida