Visual Basic para Aplicaciones - Consulta formatos Textbox

Life is soft - evento anual de software empresarial
   
Vista:

Consulta formatos Textbox

Publicado por JCC (2 intervenciones) el 15/02/2009 03:58:17
Hola! soy nuevo en la programación en VBA aplicado a Excel. Estoy haciendo un formulario que contiene varios textbox para que el usuario ingrese datos numericos. Uno de dichos textbox es para ingresar monto en moneda y otro para ingreso de un tipo de cambio. El problema esta en el formato numerico de los mismos. En ambos casos necesito que los datos usen el "." como separador de miles y la "," como separador de decimales. Siempre el usuario por comodidad ingresa los datos con el teclado numerico, el cual tiene ".", y al ingresar el tipo de cambio, 5.55 por ejemplo, la macro me lo pasa a la hoja de excel como 555,00 en lugar de 5,55. Revise otras consultas similares, pero no me resultaron las soluciones. Con qué código puedo solventar esto, y bajo cual evento del textbox en cuestión?
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de JuanC

RE:Consulta formatos Textbox

Publicado por JuanC (431 intervenciones) el 15/02/2009 11:42:56
hay varias formas de hacerlo
un pequeño ejemplo

Sub test()
Dim s$, t#
s = "5.55"
s = Replace(s, ".", ",")
t = CDbl(s)
End Sub

también puede usarse la función Val y también puede hacerse el control 'a mano',
chequeando caracter por caracter y verificar que se trata de un número válido
otras funciones a tener en cuenta son IsNumber y Evaluate

el momento de hacer el control puede ser cuando se sale del TextBox, cuando cambia su contenido o se presiona una tecla; creo que lo ideal es hacerlo en el momento de ingresar los datos, son gustos...

Saludos desde Baires, JuanC
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

RE:Consulta formatos Textbox

Publicado por Damian (1 intervención) el 21/07/2015 15:50:52
Gracias por el dato del Replace, me fue de mucha ayuda!

Damián Rodríguez
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar