hola a todos!
Tengo un Text Box que no puede ser ni igual ni inferior a zero pero sí que puede ser zero coma algo. Utilizo el código siguiente y el problema es que cuendo intentas poner 0.1, por ejemplo, te sale el mensaje porque la orden es a la que cambie y si lo primero que pulsas es un zero o inferior sale el mensaje. Que deberia poner en lugar de _Change()? He probado con eventos de ratón y de botones pero no funciona, también he mirado en la ayuda de Visual pero nada y he buscado por internet pero no sé encontrarlo, seguramente es una chorrada... encontrar la palabra precisa...
En fin, muchas gracias.
Atentamente: Lizertina.
Private Sub txtCa_Change()
On Error Resume Next
If txtCa.Text <= 0 Then MsgBox "Dada a no vàlida"
Err.Raise 13
Err.Clear
End Sub