Comprobar datos

"dargento" escribió en el mensaje news:

Hola!
Yo tengo un formulario en excel, con una serie de textbox, yo quisiera
saber ¿como hago para comprobar que los datos que me introducen, en
unos casos son texto, y en otros numericos?

Lo introducido en un cuadro de texto es siempre un texto, así que en este caso no habría mucho que comprobar.

Para comprobar si lo introducido puede ser convertido a un valor numérico, se puede usar la función IsNumeric, por ejemplo:

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Not IsNumeric(Me.TextBox1.Value) Then
MsgBox "Debe introducir un valor numérico."
Me.TextBox1 = ""
Cancel = True
End If
End Sub


El código anterior no permitirá que el "foco" de la edición se mueva a otro control hasta que lo introducido en el cuadro de texto TextBox1 sea algo convertible en número.

Tampoco se como hacer , qu esi el usuario no introduce nada, el salte
un error y le vuelva a pedir que rellene el campo.

El código anterior tampoco permitirá que se abandone el cuadro de texto si queda vacío, porque considerará que una cadena de longitud cero no es un número.
Un saludo.


Fernando Arroyo
MS MVP - Excel

Muchas gracias


dargento

dargento's Profile: http://www.msusenet.com/member.php?userid47
View this thread: http://www.msusenet.com/t-1870534672