Bonjour,  
 
je cherche à tester si la valeur que l'utilisateur entre dans le formulaire est entière. Sinon, une MsgBox s'affiche.
En effet, par définition dans ma procédure, je dois avoir un "Integer" dans la case remplie et je veux renvoyer moi-même un message plutôt que de bloquer la macro.
 
Merci d'avance pour votre aide.

bonsoir,
 
Sub test()
Dim i%
On Error GoTo GESTERR
i = Range("A1" )
MsgBox "Longue suite d'opération !"
 
Exit Sub
GESTERR:
MsgBox "Beurk ! On arrête les frais..."
End Sub
 
A+