Excel - Guardar valor de un textbox como numero

Hola Amigos, espero me puedan ayudar con esta problematica que se me presento, les explico.

Tengo un userform, donde tengo un textbox que acepta solo numeros y los guardo en una hoja de calculo, esto resulta a la perfeccion, pero al querer sumar los numeros no me los suma, he podido ver que los guarda con un formato de texto, que me impide usar la funcion de autosuma y tengo que convertirlo a numero, esto es lo que no quiero hacer porque quiero dejar establecida la autosuma y que me vaya sumando los valores a medida que vayan entrando los datos.
Aqui esta el codigo de ejemplo para que lo analicen y me puedan ayudar, se los agradezco de ante mano.

Como pueden ver en el segundo private sub no deja entrar otro valor que no sea numero, pero me guarda el valor como texto y no me lo deja sumar automaticamente.

no entiendo por qué no querés convertir a formato número pero querés sumar??

[A1].NumberFormat = "0.00" '//Formato de número con 2 decimales a la celda A1

Saludos desde Baires, JuanC

PD: no estés tan seguro con el código "sólo números"

No es que no quiera convertir en formato numero, lo que pasa que al guardar los datos en la hoja de calculo las guarda como texto y para poder sumarla tengo que convertirlas a numeros, lo que yo quiero es que al guardar los datos en la hoja lo haga directamente como numero y la suma se genere automaticamente.

lo que tengo que hacer ahora es seleccionar en un icono que sale en la parte derecha de la celda y poner la opcion de convertir a numeros, pero esto es lo que no quiero hacer, espero haber dejado mas claro, muchas gracias.

Te mando el codigo:


Espero que te sirva

Un saludo
SCM

basta con poner la palabra val antes de texbox, asi
Range("D2") = Val(TexBox1) y eso te funcionara :)

Uff! gracias Isaias!! yo también tenía el mismo problema, de tanto buscar una solución terminé acá, y fué la solución más simple...en otros lugares estaba viendo que quieren volver loco a las personas con formulas.

Gracias

Isaias, Gracias!!!! ya no sabía que hacer con esto y la respuesta tan clara y sencilla, Bendiocnes y nuevamente gracias por compartir este aporte de forma gratuita

Buenas amigos
probé su recomendación Val(TexBox1), lo reconoce como número, pero al utilizar el formatos de fechas lo iguala al 30/ene/1900
, es decir que me cambia la fecha ¿Qué código me recomiendan para evitar esto?
Saludos
Blás

usa este código para convertir el valor del texboxt a fecha, no es necesario ponerle el Val()
Tiene que ser en formato USA Mes/Dia/Año
Format(CDate(TextBox), "mm/dd/yyyy")

Gracias!! Vaya solución tan elegante ;)
saludos!

Excelente funciono me acabas de ahorrar mucho!!!GRACIAS

Excelente recomendación, si funciona

Excelente muy buena ayuda y ademas no hace obligatorio poner información en el textbox como la función CDbl

Buenas tardes, llevo a cabo la instrucción como se indica pero no me devuelve los decimales al pasar los datos del formulario a excel.
Alguien me puede indicar que error estoy cometiendo.
Gracias

Se debe escribir el código de formato en el evento click del useform


y el formato se copia en la celda objetivo.

muchas gracias por tu apoyo me sirvio perfectamente (Y)

Buen dia, me podrias indicar en que parte pongo esa palabra, si en una declaracion de funcion o donde ?, no se donde colocarla para que el dato lo arroje en formato general o numero cuando le doy guardar desde mi UseForm

Me ocurrió el mismo problema, lo solucioné creando una variable intermedia. Por ejemplo si mi cuadro de texto era llamado txtMonto en lugar de asignarlo directamente a la celda:


lo que hice fue:


Espero esto te ayude