Merci beaucoup mais, on l'ajoute ou le code pour que ca fonctionne ??? Moi aussi je cherchais un truc pour les numéros de téléphone !!!!

Merci d'avance
Florent

Si non tu as la syntaxe:

if not isNumeric(objet.text) then ...
mais le problème c'est que tu risques de pouvoir entrer des points et si tu n'en veux pas il faut ruser avec un keyup.
ex:

private sub monobjet_KeyUp(blabla auto)
if keycode = vbkeyDecimal then ... 'vbkeyDecimal c'est le caractère correspondant à la virgule ou au point, pour enlever 'la virgule il faut taper: keycode = 188 (188 correspond à la touche "?/,"
end sub

private sub monobjet_click() 'par exemple, moi je met ca sur mes boutons pour éviter les bugs
if not isNumeric(objet.text) then ...
end sub

je te conseil le keyUp si tu veux vider ta textbox ou autre si non il vide la textbox et met la virgule vu que le caractère n'est pas encore saisi (il faut que la touche soit relevé pour que le caractère soit saisi)