Salut SAHUE,
Désolé me je ne comprend pas trés bien ta question,
Pour moi tu souhaite que l'on ne puisse saisir dans ta textebox que de chiffre avec ou sans virgule :
dans ton USF :
Private sub textbox1_keypress(byval keyascii as msforms.returninteger)
'remplacement du point par la virgule :
if keyascii.value=46 then keyascii.value=44
end sub
private sub textbox1_change
if isnumeric(textbox.value)=false then
msgbox("vous devez saisir des valeurs numeric obligatoirement")
textbox1.value=0
exit sub
end if
end sub
Voila. Si ce n'est pas ce que tu souhaitai merci de préciser ta demande.
A+ et bonne fête de fin d'année......
Wilfried ;op
