¿Como establecer un TextBox solo para Números?

Usa este código

If textbox1 is not numeric then

Msgbox ("debe ingresar solo números")

Textbox1.setfocus

Exit sub

No deseo que diga nada... Lo realmente busco es que no admita el carácter. Igualmente probé el código que me diste para tratar de modificarlo y me dice que hace falta un objeto (textbox1) y ahí esta, no lo admite... Como puedo hacerlo? Te explico, voy a introducir un numero de cédula en el textbox1 y me ha pasado que increíblemente le meten letras...

Debes adaptarlo si no quieres que dIga nada le sacas la sentencia msgbox.

Si detecta que el valor no es numérico sale del procedimiento.

Debes Poner en nombre del textbOx que usa .

Si no puedes sube tu archivo desde http://programarexcel.com/p/Contacto.html

No existe algo como: "TextBox1 = Numeric" o alguna declaración??? No funciona tu código tal cual es con el TextBox1 ni adaptado. Como hago para que no permita escribir si no es numero, solo eso necesito... o que borre el carácter no numérico.

Perdona la tardanza estoy muy atareado, primero pones el dato en una variable o no es lo mismo y luego verificas si es número termina el procedimiento con exit sub

Va = Textbox1
Application.IsNumber (Va)
If Application.IsNumber(Va) = False Then
exit sub

End If