Discussion :

[ouardia]

Bonjour,
j'ai déclaré une variable "bonification" (comme un integer) dont la valeur doit etre introduite par un utilisateur. J'aimerais afficher un message d'erreur si l'utilisateur introduit une valeur qui n'est pas entière au lieu d'avoir a faire au debuggeur.
Ma question est donc : existe-t-il une fonction qui teste si la valeur introduite est entière?
Merci d'avance

[zazaraignée]

Voir dans l'aide pour les items suivants:

• La fonction IsNumeric
• La fonction Trim
• la fonction CInt
• La fonction Fix

[jfontaine]

Tu peux modifier le code pour en faire une fonction qui te renverrais vrai ou faux


http://www.developpez.net/forums/sho...d.php?t=374373

[alsimbad]

ou un round () qui simplifierais les choses.

[wilfried_42]

bonjour à tous

En cas de saisie par textbox ou inputbox, la valeur enregistrée est de type alpha

pour la transformer en entier, la fonction est CINT ou FIX mais ces fonction provoqueront une erreur si on rentre De l'apha, si on rentre des decimales, FIX les elevera mais ne provoquera l'erreur de saisie

voici un ptit code qui permetra de savoir si la saisie est bonne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
sub saisie()
Dim valeur as string, entier as integer
A = inputbox("Donner la valeur")
on error goto erreur
entier = cint(A)
goto fin
erreur:
Msgbox "La valeur saisie n'est pas conforme, nous demandons un entier"
on error goto 0
goto debut
fin:
on error goto 0
end sub

Bonne journée