Limitar decimales en cuadro de texto de formulario
Hola expertos,
Trabajo en un formulario con varios cuadros de texto que toman el valor (numérico) de determinadas celdas de una página bajo la rutina Private Sub UserForm_Initialize().
El programa funciona pero necesito limitar el número de decimales que figuran en el cuadro de texto, ya que aparecen 13 y sólo necesito 3. Por muchas vueltas que le doy no soy capaz de cambiar el formato del cuadro de texto, ya que en la página si se presentan los 3 decimales solicitados. ¿Alguien puede ayudarme?
Muchas gracias, el sitio todoexpertos es genial.
Trabajo en un formulario con varios cuadros de texto que toman el valor (numérico) de determinadas celdas de una página bajo la rutina Private Sub UserForm_Initialize().
El programa funciona pero necesito limitar el número de decimales que figuran en el cuadro de texto, ya que aparecen 13 y sólo necesito 3. Por muchas vueltas que le doy no soy capaz de cambiar el formato del cuadro de texto, ya que en la página si se presentan los 3 decimales solicitados. ¿Alguien puede ayudarme?
Muchas gracias, el sitio todoexpertos es genial.
1 Respuesta
Respuesta de Abraham Valencia
1
No das detalles, pero prueba así:
TextBox1 = Round([A1], 3)
OJO, si usas el punto como separador decimal, tendras que usar esto:
TextBox1 = Format(Round([A1], 3), "0.000")
Abraham
TextBox1 = Round([A1], 3)
OJO, si usas el punto como separador decimal, tendras que usar esto:
TextBox1 = Format(Round([A1], 3), "0.000")
Abraham
Abraham, tu solución ha funcionado estupendamente. He implementado la siguiente línea:
texto_pi_patm = Round((Sheets("Entrada").Range("I37")), 3)
En un principio usé corchetes en lugar de paréntesis y me dio error, pero así funciona OK.
Necesito hacerte otra consulta, esta vez algo más extensa. ¿He de finalizar, puntuar y volver a formular o continuar con esta línea?
Muchas gracias, me has sido enormemente útil.
texto_pi_patm = Round((Sheets("Entrada").Range("I37")), 3)
En un principio usé corchetes en lugar de paréntesis y me dio error, pero así funciona OK.
Necesito hacerte otra consulta, esta vez algo más extensa. ¿He de finalizar, puntuar y volver a formular o continuar con esta línea?
Muchas gracias, me has sido enormemente útil.
Que bueno que te sirvió. Por favor, si, cierra este tema y abre el otro para tu nueva consulta.
